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I, James Crawford, hereby declare as follows: 

1 . I have read and understood the text of U.S. Application No. 09/597,784 (the 784 
application), which discloses an invention for which I am the inventor. 

2. On or prior to April 27, 2000, 1 reduced to practice the methods, computer 
programs, apparatus, and user interface described in paragraphs 4 and 5 of this document. 

3. The attached pages are photocopies of: 

a) a screen shot of a directory containing the AIM installer program (Exhibit 1) showing 
a date of March 1, 2000 associated with the program. The AIM installer program is used to 
install the Windows AIM version 3.5.1856 binary ("the AIM program"). 

b) a redacted source code listing of the portion of the AIM program used for file transfer 
functionality (Exhibit 2). Each line of code is numbered. 

c) a redacted source code listing for the portion of the AIM program used to setup 
connections between the client and the host (Exhibit 3) 

d) a screen shot of a user interface of the AIM program showing a file transfer window 
that enables a user to set file transfer preferences (Exhibit 4). 

e) a screen shot of a user interface of the AIM program showing an instant messaging 
interface depicting a subscriber having a user identity "oscarlogan" selecting an option to get a 
file from another subscriber having a user identity "OscaRaina" (Exhibit 5). 
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f) a screen shot of a user interface of the AIM program showing a list of files that the user 
identity "oscarlogan" may attempt to get from the user identity "OscaRaina" (Exhibit 6). 

g) a screen shot of a user interface of the AIM program showing a window that is 
presented to the user identity "oscarlogan" after selecting a file from the list of files displayed in 
Exhibit 6 (Exhibit 7). 

h) a screen shot of a user interface of the AIM program showing a window that is 
presented to the user identity "oscarlogan" indicating the status of the file transfer (Exhibit 8). 

i) a screen shot of a user interface of the AIM program showing a window that is 
presented to the user identity "oscarlogan" indicating a request from the user identity 
"OscaRaina" to get files from the disk directory belonging to the user identity "oscarlogan" 
(Exhibit 9). 

4. With respect to independent claims 1,14, 29-3 1 , and 36 of the 784 application, I 
implemented and practiced a method, a computer program and an apparatus that transferred one 
or more files between clients. 

Specifically, the following was implemented and practiced as evidenced by the source 
code listings of Exhibits 2 and 3: 

(a) a connection was established with a communications system host 
• Exhibit 3 - 

o Lines 2740-2773 SessSignOn 

o Lines 1346-1396 ConnCreate 

o Lines 1514-1577 ConnConnect 

o Lines 49 1 -495 connDoServerLookup 

o Lines 171-208 connLookupHost 

o Lines 1048-1056 connWndProc 

o Lines 599-641 connEventLookupComplete 

o Lines 506-5 1 7 connDoServerConnect 

o Lines 248-262 connConnectToHost 

o Lines 1063-1080 connWndProc 

o Lines 2268-2306 connEventRecvReady 
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o Lines 2159-2265 connReceiveBlock 

o Lines 4628-4747 connProcessFLAP 

o Lines 4052-4060 connProcessSignOn 

o Lines 739-743 connEventAwaitChallangeComplete 

o Lines 569-592 connDoValidation 

o Lines 3731-3873 connSendSignOn 

o Lines 2394-2410 ConnSendPacket 

o Lines 2333-2391 connEventSendReady 

(b) a request to establish a direct connection was sent to or received from a client also 
connected to the communications system host. 

• Exhibit 2 - 

o Lines 203 1 -2032 Process Menu command to Get File 

o Lines 1733-1767 DoStartGet 

o Lines 1 705 - 1 724 RequestAndListen 

(c) when the client permitted establishment of the direct connection, a direct socket 
connection that bypasses the communications system host was established 

• Exhibit 2 - 

o Lines 3300-3323 SockListen 

o Lines 3338-3373 SockAcceptReady 

o Lines 3375-3533 SockRecvReady 

(d) and a transfer of one or more files from the client was initiated over the direct socket 
connection. 

• Exhibit 2 - 

o Lines 3 1 08-3 1 3 1 File Listing Dialog 

o Lines 1492-1494 handle IDC GET button from dialog 

o Lines 938-980 FTGetListltem 

o Lines 446-462 FTRelnitHdr 

o Lines 3639-3654 SockSend 

o Lines 464-481 FtlnitHdr 
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o Lines 3248-3827 SockXXX handle TCP i/o 

o Lines 292-1 1 58 FtXXX process bytes received from other client and 
save to disk 

5. With respect to independent claim 45 of the 784 application, I implemented and 
practiced a user interface that controlled file transfers between clients. 

Specifically, the following was implemented and practiced as evidenced by Exhibit 9: 

(a) A first graphical user interface element is configured to notify an operator of a second 
client of a request from a first client to establish a direct connection to the second client. The 
request is communicated to the second client by a communications system host, and the direct 
connection bypasses the communications system host. 

• Exhibit 9- 

o The "Get File request from OscaRaina" window. 

(b) A second graphical user interface element configured to enable an operator of the 
second client to authorize establishment of a direct connection and a file transfer over the direct 
connection. 

• Exhibit 9 - 

o The "OK" button in the "Get File request from OscaRaina" window 



6. The AIM program was produced or written by myself or under my direction on or 
prior to April 27, 2000, and the date from Exhibit 1 supports this fact. The screen shots of the 
user interfaces relating to the transfer of files between clients were produced using the AIM 
program. 



7. The AIM program corresponds to the method, computer program, apparatus, and 
user interface described in paragraphs 4 and 5 of this document. 



I further declare that all statements made herein of my own knowledge are true and that 
all statements made on information and belief are believed to be true; and further that these 
statements were made with the knowledge that willful false statements and the like so made are 
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punishable by fine or imprisonment, or both, under 18 U.S.C. §1001 and that such willful false 
statements may jeopardize the validity of the application or any patents issued thereon. 
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ft.txt 



;ST AVAILABLE COPY 



00292 void FTCl oseFi 1 eAndSetTi me (LPRENDEZVOUSTICKET rTicket) 

00293 { 



00294 struct „utimbuf times; 

00295 LPSRVSTRUCT IpSrvStruct = (LPSRV5TRUCT)rTicket->lpSrvStruct ; 

00296 FTHDR *shdr = &lpSrvStruct->sockJidr ; 
00297 

00298 if ClpSrvStruct->fileP) { 

00299 fclose(lpSrvStruct->fileP) ; 

00300 TpSrvStruct->fileP = 0; 
00301 

00302 times. actime = SWAP4(shdr->dwFiletime) ; 

00303 times.modtime = times .actime; 

00304 _utime(lpsrvstruct->di rPath f &times) ; 

00305 } 



00306 } 
00307 

00308 DWORD FTCalcChecksum(FILE* fileP, DWORD fsize) 

00309 { 

00310 WORD sum = 0; 
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00311 
00312 
00313 
00314 
00315 
00316 
00317 
00318 
00319 
00320 
00321 
00322 
00323 
00324 
00325 
00326 
00327 
00328 
00329 
00330 
00331 
00332 
00333 
00334 
00335 
00336 
00337 
00338 
00339 
00340 
00341 
00342 
00343 
00344 
00345 
00346 
00347 
00348 
00349 
00350 
00351 
00352 
00353 
00354 
00355 
00356 
00357 
00358 
00359 
00360 
00361 
00362 
00363 
00364 
00365 
00366 
00367 
00368 
00369 
00370 
00371 
00372 
00373 



ft.txt 

char buf [4096]; 

Whil ?nt f n^ Z nr = (fsize > sizeof(buf)) ? sizeof(buf) : fsize; 
n = fread(buf ,l,nr,fileP) ; 
if (n != nr) { 

sum =0; 

break; 

sum = computeSumCsum, (LPWORD)buf, n); 
fsize -= n; 

fseek(fileP, 0, SEEK_SET) ; 
sum = ~sum; 

return (DWORD) (Oxffff & sum); 

} 

DWORD FTRecalcChecksum(DWORD chksum, lpword buf, long count) 

* word sum = (word) (~chks urn) ; 

sum = ComputeSum(sum, buf .count) ; 
sum = ~sum; 

return (DWORD) (Oxffff & sum); 

} 

BOOL FTlsFi leThere(l_PSTR path, DWORD ftime, DWORD* chksumP, DWORD* fsizeP) 

* FILE *fileP = f open (path," rb") ; 
*fsizeP =0; 

*chksumP = 0; 
if (fileP) { 

struct _stat fst; 

_fstat(fileno(fileP) , &fst); 

if (fst.st_mtime == (long) ftime) { ....... 

*fsizeP = (DWORD) (fi Tel ength (f l 1 eno(f i 1 eP) )) ; 
*chksumP = FTCalcchecksum(fileP,*fsizeP) ; 

fclose(fileP) ; 
return TRUE; 

} 

return FALSE; 

} 

// this insures that there is a \ at the end . 
void FTSetDirPath(LPRENDEZVOUSTiCKET rTicket, lpstr in, BOOL buddyList) 

{ lpsrvstruct lpsrvstruct = (lpsrvstruct) rTicket->lpsrvStruct; 
lpstr cp, out = lpsrvstruct->di rPath; 
if (in) 

lstrcpy(out.in) ; 
cp = _fstrrchr(out, '\\') ; 
if (cp) { 
cp++; 
} else { 

for (cp=out; *cp; cp++) ; 
*cp++ = 'W; 

*cp = '\0'; 

lpSrvStruct->di rPathoffset = cp; 

if (buddyList) { 

1 strcpy (cp , rTi cket->ni ckname) ; 
while (*cp) cp++; 
1 strcpy (cp, ".1st") ; 

Page 6 




ft . txt 

00374 } 

00375 } 
00376 

00377 BOOL FTConstructDi rLi sting (LPSTR filelib, DWORD *totSizeP, WORD -numFilesP) 

00378 { 

00379 WIN32_FIND_DATA ffData; 

00380 HANDLE ffh; 

00381 FILE* fileP; 

00382 LPSTR listName = LISTNAME; 

00383 LPSTR logName = LOGNAME; 

00384 LPSTR cp = filelib; 

00385 while (*cp) cp++; 
00386 

00387 *totSizeP =0; 

00388 *numFilesP = 0; 

00389 1 st rcpy(cp, listName) ; 

00390 fileP = fopen (filelib, M w") ; 

00391 if (IfileP) { 

00392 return FALSE; 

00393 } 

00394 lstrcpy(cp,"*"); 

00395 ffh = FindFirstFile(filelib,&ffData) ; 

00396 , . JB 

00397 // TODO: how to tell path is a dir and not a * cmd? isdir = TRUE ; 

00398 if (ffh != INVALID_HANDLE_VALUE) { 

00399 do { 

00400 if (ffData. dwFileAttributes & FI L E_ATTRI BUTE_DI R ECTOR Y) { 

00401 // char di rpath[MAX_PATH] ; n 

00402 // TODO: go into subdirs also (recursively call this tunc??) 

00403 } else if (!lstrcmp(ffData.cFileName, listName) I I 

00404 !lstrcmp(ffData.cFileName, logName)) { 

00405 } else if (! (ffData. dwFileAttributes & FILE_ATTRIBUTE_HIDDEN) ) { 

00406 char oneline[MAX_LlST_LlNE] ; 

00407 FILETIME locFiletime; 

00408 FILETIME *ftimeP = &ffData.ftLastwri teTime; 

00409 SYSTEMTIME systime; 

00410 if (ftimeP->dwLowDateTime == 0 && ftimeP->dwHighDateTime == 0) 

00411 ftimeP = &ffData.ftCreationTime; 

00412 Fi 1 eTi meToLocal Fi 1 eTi me (f ti meP , &1 ocFi 1 eti me) ; 

00413 FileTimeToSystemTime(&locFiletime, &systime); 

00414 sprintf (one line, LINEFMT, 

00415 systi me . wMonth , systi me . wDay , systi me . wYear , 

00416 systime. wHour, systime. wMi nute, 

00417 ffData. nFileSizeLow, ffData.cFileName) ; 

00418 fwrite(oneline,lstrlen(oneline) ,l,fileP) ; 

00419 *numFilesP += 1; 

00420 *totSizeP += ffData. nFileSizeLow; 

00421 } 

00422 } while (FindNextFile(ffh,&ffData)) ; 

00423 Findclose(ffh) ; 

00424 } 

00425 fclose(fileP); 

00426 lstrcpy(cp, listName) ; 

00427 return (FTSortFi 1 e(f i 1 el i b , lineoff_name)) ; 



00428 } 
00429 

00430 BOOL FTNext Fi 1 e (LPSRVSTRUCT IpSrvStruct, LPSTR path) 

00431 { 

00432 BOOL ret = TRUE; 

00433 if (path) { 

00434 lpSrvStruct->ffh = FindFi rstFile(path,&lpSrvStruct->ffData) ; 

00435 if (lpSrvStruCt->ffh == INVALID_HANDLE_VALUE) 

00436 return FALSE; 
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00437 
00438 
00439 
00440 
00441 
00442 
00443 
00444 
00445 
00446 
00447 
00448 
00449 
00450 
00451 
00452 
00453 
00454 
00455 
00456 
00457 
00458 
00459 
00460 
00461 
00462 
00463 
00464 
00465 
00466 
00467 
00468 
00469 
00470 
00471 
00472 
00473 
00474 
00475 
00476 
00477 
00478 
00479 
00480 
00481 
00482 
00483 
00484 
00485 
00486 
00487 
00488 
00489 
00490 
00491 
00492 
00493 
00494 
00495 
00496 
00497 
00498 
00499 



} 



ft . txt 

} else 

ret = FindNextFile(lpSrvStruct->ffh,&lpsrvStruct->ffData) ; 
while (ret && 

(1 psrvstruct->f f Data . dwFi 1 eAttri butes & file_ATTRIBUTE_directory) ) 
ret = FindNextFile(lpSrvStruct->ffh,&lpsrvStruct->ffData); 
return ret; 



void FTRelni tHdr(LPRENDEZVOUSTlCKET rTicket) 

LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT) rTi cket->l pSrvStruct ; 
FTHDR *shdr = &lpSrvStruct->sock_hdr; 

lp5rvStruct->sock_starttime = GetTickCountO ; 
lpSrvStruct->sock_numSent = 0; 
lpSrvStruct->sock_numTotal = 0; 
lpSrvStruct->status_numTodo =0; 
lpSrvStruct->totalNum =1; 
lpSrvStruct->doneNum = 0; 
lpSrvStruct->status_lasttime = 0; 
lp5rvStruct->status_lastpercnt = 0; 
lpSrvStruct->totalSizeOfDoneFiles =0; 
sndr->dwFilesize = 0; 
shdr->dwTotalFilesize = 0; 

} 

void FTInitHdr(LPRENDEZVOUSTICKET rTi cket) 

LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT) rTi cket->l pSrvStruct ; 
FTHDR *shdr = &lpSrvStruct->sock_hdr; 

_fmemcpy(&shdr->bMagic[0] , 0SCAR_FT_MAGIC, sizeof (shdr->bMagic)) ; 

shdr->wHdrType = StateToHdrType(lpSrvStruct->state) ; 

_fmemcpy(&shdr->bcookie[0] , rTicket->cookie, sizeof (shdr->bCookie)) ; 

shdr->wEncryption =0; 

shdr->wCompression = 0; 

shdr->wTotalNumParts = SWAP2(1); 

shdr->wNumPartsLeft = SWAP2(1); 

shdr->dwTotalRessize = 0; 

shdr->dwRessize =0; 

shdr->dwRestime =0; 

shdr->dwReschecksum = 0; 

lstrcpy(&shdr->biDstring[0] ,0SCAR_CLIENT_ID_STRING) ; 
_fmemset(&shdr->bDummy[0] , 0, sizeof (shdr->bDummy)) ; 
if ((lpSrvStruct->state == StateFileToSend I I 
1pSrvStruct->state == StateListToSend) && 

lpsrvstruct->ffh != invalid_handle_value) { 

word tmp ; 

DWORD fsize, chksum; 

struct _stat fst; 

int hi en, bnamelen; 

FTCl oseFi 1 eAndSetTi me ( rTi cket) ; 

strncpy(&shdr->bName [0] , 1 pSrvStruct->f fData . cFi 1 eName , FNSZ) ; 
bnamelen = lstrl en (lpSrvstruct->ff Data. cFil eName) + 1; 
if (bnamelen >= FNSZ) { 

" = -XO 1 ; 



shdr->bName[FNSZ-l] 
bnamelen = FNSZ; 

} 

hi en = (sizeof (FTHDR) 
if (hi en < min_hdr_sz) 
hi en = min_hdr_SZ; 
shdr->wHdrLen = SWAP2(hlen); 
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00500 
00501 
00502 
00503 
00504 
00505 
00506 
00507 
00508 
00509 
00510 
00511 
00512 
00513 
00514 
00515 
00516 
00517 
00518 
00519 
00520 
00521 
00522 
00523 
00524 
00525 
00526 
00527 
00528 
00529 
00530 
00531 
00532 



ft.txt 

1 strcpyO psrvst ruct->di rPathOf f set , 1 psrvst ruct->f f Data . cFi 1 eName) ; 

lpSrvstruct->fileP = fopen(lpsrvStruct->di rPath,"rb") ; 

lpSrvStruct->sock_numSent = 0; 

lpSrvStruct->status_numTodo =0; 

_fstat(fileno(l psrvst ruct->fileP) , &fst) ; 

fsize = lpsrvstruct->ffData.nFileSizeLow; 

chksum = FTCal cchecksumd psrvst ruct->fileP,f si ze) ; 

shdr->dwTotalFilesize = SWAP4(lpSrvStruct->totalsize) ; 

shdr->wTotalNumFiles = SWAP2(lpSrvStruct->totalNum) ; 

tmp = lpSrvstruct->totalNum - lpSrvStruct->doneNum; 

shdr->wNumFilesLeft = SWAP2(tmp); 

shdr->dwFilesize = SWAP4(fsize) ; 

shdr->dwFiletime = SWAP4(f st . st_mtime) ; 

shdr->dwChecksum = (chksum); 

shdr->dwNumRecvd = 0; 

shdr->dwRecvdChecksum = 0; 

shdr->bFlags =0; 

if (lpsrvstruct->state == stateListTosend) { 
shdr->bListNameOffset = lineoff_name; 
shdr->bListSizeoffset = lineoff_size; 
if (lpsrvStruct->sorted) 

shdr->bFlags |= flags_SORTED ; 

else 

shdr->bFlags &= ~flags_SORTED; 

} 



} 



// returns 0 for ok, 1 for err 

bool FTVal i dateHdr (lprendezvousticket rTicket) 

// insure it is a real header and one we are expecting; we dont want to 
// allow hacker client to change headers on us to do something 



unauthorized 



00533 
00534 
00535 
00536 
00537 
00538 
00539 
00540 
00541 
00542 
00543 
00544 
00545 
00546 
00547 
00548 
00549 
00550 
00551 
00552 
00553 
00554 
00555 
00556 
00557 
00558 
00559 
00560 
00561 



} 



LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT)rTicket->lpSrvStruct; 
FTHDR *shdr = &1 psrvst ruct->sock_hdr ; 
int hdrType = shdr->wHdrType; 
int state = lpSrvStruct->state; 

if (_fmemcmpCshdr->bMagic,OSCAR_FT_MAGlC,sizeof(shdr->bMagic)) II 

_fmemcmp(shdr->bCookie, rTicket->cookie, sizeof (shdr->bCookie)) I I 
SWAP2(shdr->wHdri_en) < MIN_HDR_SZ | | 
! (hdrType & SR_MASK) | I 

// we snouldnt be reeving a header we should be sending 
(lpSrvStruct->type & SR_MASK) == (hdrType & SR_MASK) ) { 
return 1; 

shd r->blDst ri ng [IDSZ-1] =0 ; 
shdr->bName[FNSZ-l]=0; 
return 0; 



void ShowStatuswindow(LPRENDEZVOUSTlCKET rTicket, int state) 

LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT) rTicket->lpSrvStruct; 

if (ISFT_SERVER(lpSrvStruct) && 

ProfGetLong(PROF_USER, FT_KEY , FT_PUT_NO_STATUS)) 

Showwi ndow(rTi cket->hDl gwnd , SW_hide) ; 

else 

Showwi ndow(rTi cket->hDl gwnd , state) ; 

} 

// returns 0 for ok, 1 for err, 2 for done 
BOOL FTPrOCeSSHdr (LPRENDEZVOUSTICKET rTi cket) 
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00562 { 

00563 TCHAR buf[512],bufl[512]; 

00564 LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT)rTicket->lpSrvStruct; 

00565 FTHDR *shdr = &lpSrvStruct->sock_hdr ; 

00566 int hdrType = shdr->wHdrType; 

00567 int state = lpSrvStruct->state; 

00568 BOOL sendhdr = -1; 
00569 

00570 // Note this increments state to the next level 
- 00571 if (hdnype == hdr_type_file_to_send) { 

00572 if (state == StateFileToSend) { 

00573 BOOL normal = TRUE; 

00574 DWORD fsize, chksum, fsizel, chksuml; 

00575 lpsrvStruct->totalNum = SWAP2(shdr->wTotalNumFiles) ; 

00576 lpsrvStruct->totalSize = SWAP4(shdr->dwTotalFilesize) ; 

00577 if (rTicket->cmdID != CMDID_SEND_FILE) { 

00578 int nd,nf; 

00579 FTSetDirPath(rTicket,0,0) ; 

00580 nd = (i nt) (lpSrvstruct->di rPathoffset 

00581 - &lpSrvStruct->dirPath[0]) ; 

00582 nf = lstrlen(shdr->bName) + 1; 

00583 if (nd + nf > MAX_PATH) 

00584 nf = MAX_PATH - nd; 

00585 strncpy (1 pSrvStruct->di rPathOf f set , shdr->bName , nf ) ; 

00586 lpSrvStruct->dirPath[MAX_PATH-l] = 1 \0 1 ; 

00587 if (CheckForSecurityHoles(shdr->bName)) { 

00588 SET_RENDEZVOUS_DECLINE(rTi cket) ; 

00589 return 1; 

00590 } 

00591 } 4 

00592 FTCloseFileAndSetTime(mcket) ; 

00593 if (FTlsFileThere(lpSrvStruct->dirPath,SWAP4(shdr->dwFiletime) , 

00594 &chksum,&fsize)) { 

00595 UINT id = 0; 

00596 // file already exists; decide if we need to resume it 

00597 fsizel = SWAP4(shdr->dwFilesize) ; 

00598 chksuml = (shdr->dwChecksum) ; 

00599 if (chksum == 0) { 

00600 // file exists but wrong timestamp or 0 length 

00601 Loadstri ng(l pOCMlnf o->hModul e , IDSFT__ErrFi 1 eAl readyExi stsl , 

00602 buf.sizeof buf ) ; 

00603 sprintf (buf 1, buf ,lpSrvStruct->di rPath) ; 

00604 if (lpSrvStruct->flags & (FLAGS_YES|FLAGS_NO) || 

00605 MessageBox(rTicket->hDlgWnd, bufl, 0, 

00606 MB_OKCANCEL | MB_DEFBUTTON2 | MB„ICONEXCLAMATION) 

00607 ==IDOK) { 

00608 remove(l pSrvstruct->di rPath) ; 

00609 } else { 

00610 shdr->bFlags |= flags_dontwant; 

00611 id = iDSFTP_RecvrDoneDontwant ; 

00612 } 

00613 } else if (fsizel == fsize && chksuml == chksum) { 

00614 // dont bother with this file 

00615 shdr->dwNumRecvd = SWAP4(fsize) ; 

00616 shdr->dwRecvdChecksum = (chksum) ; 

00617 shdr->bFlags |= flags.identical; 

00618 id = iDSFTP_RecvrDoneNothing; 

00619 } else if (fsize < fsizel) { 

00620 // local file is smaller; offer to resume 

00621 lpsrvstruct->state = stateFilewantToResume; 

00622 shdr->dwNumRecvd = SWAP4(f si ze) ; 

00623 shdr->dwRecvdChecksum = (chksum); 

00624 normal = FALSE; 
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00625 } 

00626 if (id != 0) { 

00627 lpsrvstruct->state = StateFileFooter; 

00628 if (rTicket->cmdlD == CMDI D_G ET_L I ST) 

00629 shdr->bFlaqs |= FLAGS_CONT; 

00630 AppendMsg(rTicket, id, FALSE, ISFT_RCVR(lpSrvStruct), TRUE) ; 

00631 1 pSrvStruct->doneNum++ ; 

00632 lpSrvStruct->totalSizeofDoneFiles += fsizel; 

00633 FTinitFileList(rTicket, FALSE); 

00634 SET_RENDEZVOUS_DONE(rTicket) ; 

00635 normal = FALSE; 

00636 } _ 

00637 lpsrvstruct->flags &= ~(FLAGS„NO| FLAGS_YES) ; 

00638 } 

00639 if (normal) { 

00640 lpsrvstruct->state = StateFi leOkToSend; 

00641 lpsrvstruct->filep = fopen(lpsrvStruct->di rPath, M wb M ) ; 

00642 if (!lpSrvStruct->fileP) { 

00643 LoadSt ri ng (1 pOCMlnf o->hModul e , lDSFT_Er rCantOpenFi 1 e , 

00644 buf .sizeof buf) ; 

00645 MessageBox(rTicket->hDlgwnd, buf, 0, MB_OK) ; 

00646 return 1; 

00647 } 

00648 } 

00649 sendhdr = TRUE; 

00650 } 

00651 } else if (hdrType == HDR_TYPE_FILE_OK_TO_SEND) { 

00652 if (state == StateFi leOkToSend) { 

00653 lpsrvstruct->state = StateFi leData; 

00654 sendhdr = FALSE; 

00655 } r 

00656 } else if (hdrType == hdr_type_file_want_to_resume) { 

00657 if (state == StateFi leOkToSend) { 

00658 DWORD chksum; 

00659 DWORD nrecvd = SWAP4(shdr->dwNumRecvd) ; 

00660 DWORD chksumr = (shdr->dwRecvdChecksum) ; 

00661 BOOL good = FALSE; 

00662 FILE- fileP = fopen(lpSrvStruct->di rPath , "rb") ; 

00663 if (fileP) { 

00664 chksum = FTCalcChecksum(fileP, nrecvd) ; 

00665 fclose(fileP); 

00666 if (chksum == chksumr) { 

00667 lpSrvStruct->sock_numSent = nrecvd; 

00668 lpSrvStruct->sock_numTotal += lpSrvStruct->sock_numSent ; 

00669 good = TRUE; 

00670 } 

00671 } 

00672 if (Igood) { 

00673 shdr->dwRecvdChecksum =0; 

00674 shdr->dwNumRecvd =0; 

00675 nrecvd =0; 

00676 } 

00677 lpSrvStruct->state = StateFi leToResume; 

00678 sendhdr = TRUE; 

00679 } 

00680 } else if (hdrType == hdr_type_file_to_resume) { 

00681 if (state StateFi leToResume) { 

00682 DWORD nrecvd = SWAP4(shdr->dwNumRecvd) ; 

00683 lpsrvstruct->state = StateFi leOkToResume; 

00684 lpsrvstruct->filep = fopen(lpSrvStruct->di rPath , 

00685 nrecvd ? n ab M : "wb") ; 

00686 if (!lpSrvStruct->fileP) { 

00687 LoadStri ng (1 pOCMlnf o->hModul e , lDSFT_ErrCantOpenFi 1 e , 
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00688 buf.sizeof buf ) ; 

00689 MessageBox(rTicket->hDlgWnd, buf, 0, mb_ok) ; 

00690 return 1; 

00691 } 

00692 if (nrecvd) { ' 

00693 lpSrvStruct->sock_numTotal += nrecvd; 

00694 } 

00695 sendhdr = TRUE; 

00696 } 

00697 }-.e1se if (hdrType HDR_TYPE_FILE_OK_TO_RESUME) { 

00698 if (state == StateFi leOkToResume) { 

00699 lpSrvStruct->state = StateFi leData; 

00700 sendhdr = FALSE; 

00701 } 

00702 } else if (hdrType == HDR_TYPE_FlLE_FOOTER) { 

00703 if (state == StateFi leFooter || 

00704 state == StateFi leOkToSend) { 

00705 UINT id = lDSFTP_RecvrDone ; 

00706 if (shdr->bFlags & flags_dontwant) 

00707 id = iDSFTP_RecvrDoneDontwant ; 

00708 else if (shdr->bFlags & FLAGS_IDENTICAL) 

00709 id = iDSFTP_RecvrDoneNothing; 

00710 else if (shdr->dwChecksum && 

00711 shdr->dwChecksum != shdr->dwRecvdChecksum) 

00712 id = iDSFTP_RecvrDoneBadSum; 

00713 AppendMsg(rTicket, id, FALSE, lSFT_RCVR(lpSrvStruct) ,TRUE) ; 

00714 1 psrvst ruct->doneNum++ ; 

00715 lpSrvstruct->totalSizeOfDoneFiles += SWAP4(shdr->dwFilesize) ; 

00716 if (lpSrvStruct->doneNum < lpSrvStruct->totalNum && 

00717 FTNextFile(lpSrvStruct, 0)) { 

00718 lpSrvStruct->state = StateFi leToSend; 

00719 sendhdr = TRUE ; 

00720 } else if (shdr->bFlags & FLAGS_CONT) { 

00721 ShowStatuswindow(rTicket, SW_HIDE) ; 

00722 lpsrvstruct->state = StateLi stwantToGet; 

00723 lpSrvStruct->sock_flags |= SockReadyToRecei veHdr ; 

00724 SET_RENDEZVOUS_DONE( rTi cket) ; 
0072 5 SockStartwai tTi mer ( rTi cket) ; 

00726 return 0; 

00727 } else { 

00728 SET_RENDEZVOUS_DONE (rTi Cket) ; 

00729 return 1; 

00730 } 

00731 } 

00732 } else if (hdrType == HDR_TYPE_LlST_TO_SEND) { 

00733 if (state == StateLi stToSend) { 

00734 1 psrvst ruct->total Num = swAP2(shdr->wTotalNumFiles) ; 

00735 lpSrvStruct->tota!size = swAP4(shdr->dwTotalFilesize) ; 

00736 if (rTicket->cmdlD == CMDID_GET_J_IST) { 

00737 FTSetDi rPath (rTi cket , 0 , TRUE) ; 

00738 if (lpSrvStruct->fileP) 

00739 fclose(lpSrvStruct->fileP) ; 

00740 1 psrvst ruct->fileP = fopen(lpSrvStruct->di rPath, "wb") ; 

00741 if (!lpSrvStruct->fileP) { 

00742 LoadSt ri ng(l pOCMinfo->hModul e , lDSFT_Er rCantOpenFi 1 e , 

00743 buf,sizeof buf); 

00744 MessageBox(rTicket->hDlgWnd, buf, 0, mb_OK) ; 

00745 return 1; 

00746 } 

00747 lpsrvstruct->state = StateLi stOkToSend ; 

00748 sendhdr = TRUE; 

00749 } 

00750 } 
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00751 } else if (hdrType == HDR_TYPE_LIST_OK_TO_SEND) { 

00752 if (state == stateListOkToSend) { 

00753 lpsrvstruct->state = StateListData; 

00754 sendhdr = FALSE; 

00755 } 

00756 } else if (hdrType == HDR_TYPE_LIST_FO0TER) { 

00757 if (state — StateListFooter) { 

00758 AppendMsg(rTi cket , lDSFTP„RecvrDone , FALSE , 

00759 ISFT_RCVR(lpSrvStruct),TRUE) ; 
„ 00760 SET_RENDEZVOUS_DONE(rT_i cket) ; 

00761 if (shdr->bFlags & FLAGS_CONT) { 

00762 showStatuswindow(rTicket, SW_HIDE) ; 

00763 lpsrvstruct->state = StateListwantToGet ; 

00764 lpSrvStruct->sock_flags |= sockReadyToReceiveHdr; 

00765 SockStartWaitTimer(rTicket) ; 

00766 return 0; 

00767 } 

00768 } 

00769 } else if (hdrType == hdr_type„list_want_to_get) { 

00770 if (state == StateListwantToGet) { 

00771 FTRelnitHdr(rTicket) ; 

00772 lpsrvstruct->state = StateFileTosend; 

00773 showStatusWindow(rTicket , SW_SHOW) ; 

00774 FTPrepareForPut(rTicket, shdr->bName) ; 

00775 sendhdr = TRUE; 

00776 lpSrvStruct->sock_timeout = 0; 

00777 } 

00778 } 

00779 if (sendhdr == -1) 

00780 return 1; 
00781 

00782 SockSend(rTicket , sendhdr) ; 

00783 return 0; 



00784 } 
00785 

00786 void FTlncrementState(LPRENDEZVOUSTlCKET rTicket) 

00787 { 

00788 LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT) rTi cket->l pSrvStruct ; 

00789 FTHDR *shdr = &lpSrvStruct->sock_hdr ; 

00790 int state = lpSrvStruct->state; 
00791 

00792 // There are 3 state paths that are followed; 

00793 // 1) FToSend->FOkToSend->FData->FFooter 

00794 // 2) FToSend->FWantToResume->FToResume->FOkToResume->FData->FFooter 

00795 // 3) LToSend->LOkToSend->LData->LFooter/LWantToGet->FToSend. . . 



00796 switch (state) { 

00797 case StateFileTosend: 

00798 lpSrvStruct->state = StateFi leOkToSend ; 

00799 break; 

00800 case StateFi leOkToSend: 

00801 lpsrvstruct->state = StateFi leData; 

00802 break; 

00803 case StateFi leData: 

00804 lpsrvstruct->state = StateFi leFooter; 

00805 if (rTicket->cmdID == CMDID„GET_LIST) 

00806 shdr->bFlags |= FLAGS_CONT; 

00807 break; 

00808 case StateFi leFooter: 

00809 if (rTicket->cmdID == CMDID_GET_LIST) 

00810 lpsrvstruct->state = StateListwantToGet; 

00811 else 

00812 lpsrvstruct->state = StateFileTosend; 

00813 break; 
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00814 

00815 

00816 

00817 

00818 

00819 

00820 

00821 

00822 

00823 

00824 

00825 

00826 

00827 

00828 

00829 

00830 

00831 

00832 

00833 

00834 

00835 

00836 

00837 

00838 

00839 

00840 

00841 

00842 

00843 

00844 

00845 

00846 

00847 

00848 

00849 

00850 

00851 

00852 

00853 

00854 

00855 

00856 

00857 

00858 

00859 

00860 

00861 

00862 

00863 

00864 

00865 

00866 

00867 

00868 

00869 

00870 

00871 

00872 

00873 

00874 

00875 

00876 



ft.txt 

case stateFilewantToResume: 
lpsrvstruct->state = StateFileToResume; 
break * 

case StateFileToResume: 

lpsrvstruct->state = stateFileOkToResume; 
break* 

case StateFileOkToResume: 

lpsrvstruct->state = StateFileData; 

break; 
case StateListToSend: 

lpSrvStruct->state = StateListOkToSend; 

break; 

case StateListOkToSend: 

lpsrvstruct->state = StateLi stData; 

break; 
case StateLi stData: 

lpsrvstruct->state = StateLi stFooter; 

shdr->bFlags |= flags_cont; 

break; 
case StateLi stFooter: 

'lpsrvstruct->state = StateLi stwantToGet; 

break; 

case StateLi stwantToGet: 

lpsrvstruct->state = stateFileToSend; 
break; 

} 

} 

BOOL FTCountFilesToSend(LPSTR path, DWORD* totsize, WORD- totnum) 

* WIN32_FIND_DATA ffData; 

handle ffh = FindFirstFile(path,&ffData) ; 
BOOL isdir = FALSE; 

// TODO: how to tell path is a dir and not a * cmd? isdir = TRUE; 
"totnum = 0; 
*totsize = 0; 

if (ffh != INVALID_HANDLE_ VALUE) { 
do { 

if (ffData.dwFileAttributes & file_attribute_directory) { 
// char di rpath [MAX_PATH] ; 

// TODO: go into subdirs also (recursively call this funcj 
} else { 

*totnum +=1; 

-totsize += ffData. nFileSizeLow; 

} while (FindNextFile(ffh,&ffData)) ; 
Findclose(ffh) ; 

} 

return isdir; 

} 

void FTMakeLocal path (lprendezvousticket rTicket, lpstr local path, int size) 

* lpsrvproft IpSrvProFt = (LPSRVPROFT)(rTicket->lpSrvProposal) ; 
GetDi rDownl oad (1 ocal path) ; 

MakeDi r (local path) ; 

if (rTicket->cmdiD «= cnidid_send_file) { 
LPSTR path = &lpSrvProFt->bName[0] ; 
LPSTR lp, Ipe, cp = _fstrrchr(path, '\\'); 
if (!cp) . 

cp = _fstrrchr(path, '/'); // in case lts Unix 
if (!cp) 

Page 14 



ft.txt 

00877 cp = _fstrrchr(path, ' : '); // in case its Mac 

00878 if (!cp) 

00879 cp = path; 

00880 else 

00881 cp++; 

00882 for (lp=localpath ; *lp; lp++); 

00883 if (*(lp-D != 'W) 

00884 *lp++ = '\V ; no , 

00885 for (lpe=localpath+size-l; *cp && lp < Ipe; ) 

00886 . . *1 p+> . = *.cp++ ; 

00887 *lp - '\0' ; 

00888 } 

00889 } 
00890 

00891 BOOL FTPrepareForPut (lprendezvousticket mcket, lpstr fp) 

00892 { .... 

00893 LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT)mcket->lpSrvStruct; 

00894 BOOL isDir; 

00895 WORD numFiles; 

00896 DWORD totSize; 

00897 char filelib[2*MAX_PATH] ; 
00898 

00899 GetDirFilelib(filelib) ; 
00900 

00901 if (*fp == '\0') { 

00902 lpsrvstruct->state = StateListTosend; 

00903 lpSrvStruct->sorted = FTConstructDi rListingCfilelib, &totSize, 

00904 &numFiles); 

00905 } else if (CheckForsecuri tyHol es(f p)) { 

00906 AppendMsg(rTicket, lDSFTP_RecvrDecline, FALSE, FALSE, FALSE); 

00907 SET_RENDEZVOUS_DECLINE(rTi cket) ; 

00908 cleanup(rTicket, 0); 

00909 return FALSE; 

00910 } else { 

00911 LPSTR cp = filelib + lstrlen(filelib) ; 

00912 lstrcpy(cp,fp); 

00913 lpsrvstruct->state = StateFileToSend; 

00914 isDir = FTCountFilesToSend(filelib, &totSize, &numFiles); 

00915 } 

00916 // if there are no files in the FILE_LIBRARY, return an IGNORE NAK 

00917 if (! numFiles) { 

00918 AppendMsg(rTicket, lDSFTP_HasNoFi 1 es , false, true, FALSE); 

00919 SET_RENDEZVOUS_IGNORE(rTi cket) ; 

00920 cleanUp(rTicket, 0); 

00921 return FALSE; 

00922 } 

00923 lpSrvStruct->totalNum = numFiles; 

00924 lpSrvStruct->totalSize = totSize; 

00925 FTNextFile(lpSrvStruct, filelib); 

00926 FTSetDi rPath (rTicket ,fi lei ib,0) ; 

00927 return TRUE; 

00928 } 
00929 

00930 void FTEnabl eGet But (HWND hwndList, HWND hwndGet) 

00931 { 

00932 //int selid = (int)SendMessage(hwndLi st , LB_GETCURSEL, 0,0) ; 

00933 //Enablewindow(hwndGet, selid != LB_ERR) ; 

00934 int n = (int)SendMessage(hwndLi st , LB_GETSELCOUNT,0,0) ; 

00935 Enablewindow(hwndGet , (n > 0)); 



00936 } 
00937 

00938 void FTGetLi stltem( LPRENDEZVOUSTICKET rTicket) 

00939 { 
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00940 




00941 




00942 




00943 




00944 




00945 




00946 




00947 




00948 




00949 




00950 




00951 




00952 




00953 




00954 




00955 




00956 




00957 




00958 




begi n 




00959 




00960 




00961 




begi n 




00962 




00963 




00964 




00965 




00966 




00967 




00968 




00969 




00970 




00971 




00972 




00973 




00974 




00975 




00976 




00977 




00978 




00979 




00980 } 


00981 




00982 


// 


00983 


BO 


00984 


{ 


00985 




00986 




00987 




00988 




00989 




00990 




00991 




00992 




00993 




00994 




00995 




00996 




00997 




00998 




00999 




01000 
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char oneline[MAX_LlST„LlNE] ; 
LPSTR cp; 
DWORD num; 

int selid.n; ... 

lpsrvstruct IpSrvStruct = (LPSRVSTRUCT)rTicket->lpSrvStruct; 

FTHDR *shdr = &lpSrvStruct->sock_hdr; 

hwnd hwndDlg = rTicket->hDlgwnd; 

hwnd hwndList = GetDlgltem(hwndDlg, IDC_DIR_FILELIST) ; 
HWND hwndGet = GetDlgltem(hwndDlg, IDC_GET) ; 
HWND hwndstop = GetDlgitem(hwndDlg, IDABORT) ; 

//selid = (int)SendMessage(hwndList, LB_GETCURSEL,0,0) ; 
//if (selid != LB_ERR) { 

n = (int)SendMessage(hwndList, LB_GETSELCOUNT, 0,0) ; 

if (n > 0) { , N , NO v , 

sendMessageChwndLi st , LB_GETSELITEMS ,1, (lparam) (LPSTR)&se 1 1 d) ; 
lpSrvStruct->sellD = selid; 

SendMessageChwndLi st, LB_GETTEXT, selid, (lparam) (LPSTR)onel i ne) ; 
cp = oneline + shdr->bLi stNameOffset + 1; // one for extra at 



1 strcpy(&shdr->bName [0] , cp) ; 

FTRelnitHdr(rTicket) ; 

cp = oneline + shdr->bLi stSizeOffset 



+ i; // one for extra 



at 



num = (DWORD) atol Ccp) ; 
shdr->dwFilesize = SWAP4(num) ; 
shdr->dwTotalFilesize = shdr->dwFilesize; 
lpsrvStruct->sock_timeout = 0; 
SockSend(rTicket,TRUE) ; 

ShowThermo(rTi cket->hDl gWnd , sw_SHOW , SW_HIDE) 
setFocus(hwndList) ; 
Enabl ewi ndow(hwndGet , FALSE) ; 
Enabl ewi ndow(hwndstop , TRUE) ; 
Enabl ewi ndow(hwndLi st , FALSE) ; 
else { 

lpSrvStruct->totalSizeOfDoneFiles = 0; 
FTEnabl eGet But (hwndLi st , hwndGet) ; 
Enabl ewi ndow(hwndstop , FALSE) ; 
Enabl ewi ndow(hwndList, TRUE); 
SockstartwaitTimer(rTicket) ; 



returns if file is 



successfully sorted 
path, WORD offset) 



BOOL ret = FALSE; 

// has to be "rb" in order for filelength to work 
FILE *fileP = fopen(path,"rb") ; ; 
if (fileP) { 

LPSTR fileMem,lp,lpe; 



right 



LPSTR- 
LPSTR* 
LPSTR" 
LPSTR" 
int n. 



names 
np; 
npl; 
np2; 

nn, nl = 



0; 



long ntot, nr, size; 

size = filelength(fileno(fileP)) ; 
if (!size) 

return TRUE; 

fileMem = (LPSTR)MemAlloc(size + size); // make room for ptrs 
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01001 

01002 

01003 

01004 

01005 

01006 

01007 

01008 

01009 

01010 

01011 

01012 

01013 

01014 

01015 

01016 

01017 

01018 

01019 

01020 

01021 

01022 

01023 

01024 

01025 

01026 

01027 

01028 

01029 

01030 

01031 

01032 

01033 

01034 

01035 

01036 

01037 

01038 

01039 

01040 

01041 

01042 

01043 

01044 

01045 

01046 

01047 

01048 

01049 

01050 

01051 

01052 

01053 

01054 

01055 

01056 

01057 

01058 

01059 

01060 

01061 

01062 

01063 
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lp = fileMem; 

lpe = fileMem + size; 

names = (LPSTR*)(lpe+2) ; 

np = names; 

ntot = size; 

*lpe = '\n'; 

*(lpe+l) = 0; 

if (IfileMem) { 

fclose(fileP); 

return FALSE; 

while (ntot) { 
nr = ntot; 
if (nr > 0x7fff) 

nr = 0x7fff ; 
if (fread(lp,l,nr,fileP) == 0) 

break; 
lp += nr; 
ntot -= nr; 

fclose(fileP); 

// fill in pointers to beginning of each row 
lp = fileMem; 
while (lp < lpe) { 
*np++ = lp; 

while (*lp != '\r' && *lp != '\n') 
lp++; 

while (*lp == 'V | | *lp == '\n') 
*lp++ = 0; 

// now sort pointers; dont worry too much about speed 
for (n=nl ; n; n — ) { 
npl = names; 

for (nn=l; nn<n; nn++) { 
LPSTR cpl,cp2; 
np2 = npl + 1; 
cpl = *npl + offset; 
cp2 = *np2 + offset; 
if (lstrcmp(cpl,cp2) > 0) { 

cpl = *npl; 

*npl = *np2; 

*np2 = cpl; 

} 

■ npl++; 

// now write the sorted lines back to disk 
fileP = f open (path, "wb") ; 
if (fileP) { 
npl = names; 
while (nl--) { 

int len = lstrlen(*npl) ; 
fwrite(*npl,len,l,fileP) ; 
fwrite("\r\n",2,l,fileP); 
npl++ ; 

} 

fclose(fileP) ; 
ret = TRUE; 

} 

MemF ree (fileMem) ; 



return ret; 
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01064 } 
01065 

01066 void FTlnitUnsorted(LPSTR path, HWND hwnd, HWND hwndList, int charwid) 

01067 { 



01068 FILE *fileP; - 

01069 char oneline[MAX_LIST_LINE] ; 

01070 RECT wndRect; 

01071 int wold, w, wdel ; 
01072 

01073 SendMessage (hwndList, LB_RESETCONTENT , 0, 0); 

01074 fileP = f open (path," rb") ; 

01075 if (fileP) { 

01076 int nr, npos = 0, selid = 0, maxn = 0, len; 

01077 oneline[0J = ' ' ; // replaced with * when file transferred 

01078 while ((nr = f read(&oneline[l] ,l,sizeof (oneline)-2,fileP)) > 0) { 

01079 int nn ^ 0; 

01080 LPSTR linel = &oneline[l]; 
01081 

01082 while (nn < nr && *linel != '\r' && *linel != '\n') { 

01083 linel++; 

01084 nn++; 

01085 } 

01086 while (*linel = '\r' I I -linel == '\n') { 

01087 *linel++ = '\0' ; 

01088 nn++; 

01089 } 

01090 npos += nn; 

01091 fseek(fileP, npos,SEEK_SET) ; 

01093 SendMessage(hwndLi st , lb_insertstring , sel i d++ , (LPARAM)&onel i ne [0] ) ; 

01094 len = lstrlen(oneline) ; 

01095 if (len > maxn) 

01096 maxn = len; 

01097 } 

01098 fclose(fileP); 
01099 

01100 // expand the window to fit more chars 

01101 GetwindowRect (hwndList, &wndRect) ; 

01102 ScreenRectToClient(hwnd, &wndRect) ; 

01103 wold = wndRect. right - wndRect .left ; 

01104 maxn +=4; // to allow for scroll bar 

01105 w = maxn * charwid; 

01106 if (w > wold) { 

01107 wdel = w - wold; 

01108 MoveWindow(hwndList, wndRect. left, wndRect .top, 

01109 w, wndRect. bottom - wndRect. top, TRUE); 
OHIO GetwindowRect (hwnd, &wndRect) ; 

01111 wold = wndRect. right - wndRect. left; 

01112 Movewindow(hwnd, wndRect .left , wndRect. top, wold + wdel, 

01113 wndRect. bottom - wndRect. top, TRUE); 

01114 } 

01115 } 



01116 } 
01117 

01118 void FTlnitFileList(LPRENDEZVOUSTlCKET rTi cket , BOOL firstTime) 

01119 { 



01120 FILE *fileP = NULL; 

01121 char oneline[MAX_LIST_LlNE] , buf [256] ; 

01122 HWND hwndDlg = rTicket->hDlgWnd; 

01123 HWND hwndList = GetDlgltem(hwndDlg, IDC_DIR_FILELIST) ; 

01124 HWND hwndGet = GetDlgltem(hwndDlg , IDC_GET) ; 

01125 HWND hwndstop = GetDlgltem(hwndDlg, IDABORT) ; 

01126 hwnd hwndText = GetDlgltem(hwndDlg, IDC_STATUS„TEXT1) ; 
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01127 

01128 

01129 

01130 

01131 

01132 

01133 

01134 

01135 

01136 

01137 

01138 

01139 

01140 

01141 

01142 

01143 

01144 

01145 

01146 

01147 

01148 

01149 

01150 

01151 

01152 

01153 

01154 

01155 

01156 

01157 

01158 
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hwnd hwndTherm= GetDlgitem(hwndDlg, idc_thermo) ; 
lpsrvstruct IpSrvStruct = (LPSRVSTRUCT)rTicket->1pSrvstruct; 
FTHDR *shdr = &lpSrvStruct->sock_hdr; 
int selid = 0; 

if (firstTime) { 

lpSrvStruct->totalSizeOfDoneFiles = 0; 

FTSetDi r Path ( rri cket , 0 , TRUE) ; 

if (!(shdr->bFlags & FLAGS_SORTED)) . 

FTSortFi 1 e(lpSrvStruct->di rPath , shdr->bLi stNameOf f set) ; 
FTlnitUnsorted(lpSrvStruct->dirPath, hwndDlg, hwndLi st, 
T pSrvSt ruct->l i stFontwi dth) ; 

Loadstring(lpOCMinfo->hModule, iDSFT_FileListinfo, buf, sizeof buf); 
Setwi ndowText (hwndText , buf) ; 
showThermo(hwndDl g , SW_hide , sw_SHOW) ; 
Enabl ewi ndow(hwndGet , FALSE) ; 
Enabl ewi ndow(hwndStop , FALSE) ; 
set Focus (hwndLi st) ; 
} else { 

selid = lpSrvstruct->sellD; 
inval i dateRect ChwndDl g , 0 .TRUE) ; 
// we just finished transferring 
sendMessage (hwndLi st, lb_SETSEL, 
SendMessageChwndLi st , 
SendMessage(hwndLi st , 
one1ine[0] = '*' ; 
SendMessage (hwndLi st , 
FTGetLi st item (rri cket) ; 
return; 



the selection; update the list box 
0, selid); • , . N 

LB_GETTEXT, selid, (lparam) (LPSTR)onel i ne) ; 

LB_DELETESTRING , selid, 0); 

LB_INSERTSTRING , selid, (LPARAM) onel i ne) ; 



page 19 



ft.txt 



01492 case IDC_GET: 

01493 FTGetLi stItem(rTi cket) ; 

01494 return 1; 
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01705 void RequestAndLi sten (LPRENDEZVOUSTICKET rTicket, int ids, TCHAR* path) 

01706 { 



01707 TCHAR preBuf [MAX_PRETEXT_SIZE] , buf[512]; 
01708 

01709 Loadstring(lp0CMInfo->hModule, ids, buf, sizeof (buf)) ; 

01710 wsprintf (preBuf , buf, path); 

01711 rTicket->preText = preBuf; 

01712 rTicket->timeoutTime = GetTickCountO + RENDEZVOUS_TlMEOUT_DE fault ; 

01713 SET_RENDEZVOUS_IPADDR(rTi cket) ; 
01714 

01715 if (OMSendMessageByRef (OMTYPE_REQUEST, OMGROUP_RENDEZVOUS, 

01716 OMSG_RENDEZVOUS_REQ„PROPOSAL , 

01717 Sizeof (RENDEZVOUSTICKET) , rTicket)) { 

01718 HWND hwndDlq = rTicket->hDlgWnd ; 

01719 rTicket->hDlgWnd = 0; 

01720 Destroywindow(hwndDlg) ; 

01721 OpenStatus(rTi cket, TRUE) ; 

01722 SockListen(rTicket) ; 

01723 } 



01724 } 

01726 void DoSockConnect (LPRENDEZVOUSTICKET rTicket) 

01727 { 

01728 OpenStatus(rTi cket, FALSE) ; 

01729 SockCleanup(rTicket) ; 

01730 sockconnect (rTicket) ; 

01731 > 

01733 void DoStartGet (LPRENDEZVOUSTICKET rTicket, LPSTR path) 

01734 { 

01735 HWND hwndDlg = rTicket->hDlgWnd; 

01736 FILE *lnst ream = NULL; 

01737 HWND hwndFile = GetDlgltem(hwndDlg, IDC_FILE); 

01738 int Ten, ids; 

01739 LPSRVPROFT IpSrvProFt; 

01740 LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT)rTicket->lpSrvStruct; 
01741 

01742 len = Istrlen(path) + sizeof (SRVPROFT) ; 

01743 IpSrvProFt = (LPSRVPROFT) rTi cket->lpSrvProposal ; 

01744 if (MpSrvProFt) { 

01745 Cleanup(rTicket, 0); 

01746 return; 

01747 } 

01748 rTicket->1enSrvProposal = len; 

01749 len -= 4; 

01750 lpsrvstruct->type = TypeGet; 
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01751 if Cpath[0] ' \0 ' ) { 

01752 lpsrvstruct->state = StateLi stToSend; 

01753 lpSrvProFt->wSubtype = SUBTYPE_GET_l_IST; 

01754 rTicket->cmdlD = CMDID_GET_LIST; 

01755 ids = IDSFTP_GetListRequest; 

01756 } else { 

01757 lpsrvstruct->state = StateFileToSend; 

01758 TpSrvProFt->wSubtype = SUBTYPE_GET_FILES; 

01759 ids = IDSFTP_GetterRequest; 

01760 } 

01761 lstrcpy(&lpSrvProFt->bName[0] , path); 

01762 lpsrvProFt->wTag = swap2(rendezvous_tlv_tags_service_data) ; 

01763 lpSrvProFt->wLen = SWAP2(len); 

01764 FTMakeLocal Path (rTi cket , 1 psrvst ruct->di rPath , 

01765 si zeof CI pSrvSt ruct->di rPath) ) ; 

01766 RequestAndListen (rTi cket, ids, path); 

01767 } 
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02031 if (rTicket->cmdlD = CMDID_GET_LIST) 

02032 DoStartGet(rTicket, ; 
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02102 bool Dost art Put (lprendezvousticket rTicket) 

02103 { 



02104 TCHAR buf [512] ; 

02105 LPSTR fp; 

02106 int ids; 

02107 LPSRVPROFT IpSrvProFt = (LPSRVPROFT)(rTicket->lpSrvProposal) ; 

02108 if (MpSrvProFt | I 

02109 OpSrvProFt->WTag != SWAP2(RENDEZVOUS_TLV_TAGS_SERVICE_DATA))) { 

02110 SET_RENDEZVOUS_BUSTED(rTi cket) ; 

02111 return FALSE; 

02112 } 
02113 

02114 SET_RENDEZVOUS_NO_PROMPT(rTicket) ; 

02115 fp = &lpSrvProFt->bName[0] ; 

02116 if (*fp == '\0') 

02117 ids = lDSFTP_GetListRequest; 

02118 else 

02119 ids = lDSFTP_GetterRequest; 
02120 

02121 LoadString(lpOCMlnfo->hModule, ids, buf, si zeof (buf)) ; 

02122 wsprintf (rTicket->preText , buf, f p) ; 

02123 rTicket->lenSrvStruct = si zeof (SRVSTRUCT) ; 

02124 return TRUE; 



02125 } 
02126 
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02127 void DoStart Put Post (LPRENDE2V0USTTCKET rTicket) 

02128 { 



02129 // Note: the IpSrvStruct cannot be used before this 

02130 long allow; 

02131 LPSRVSTRUCT. IpSrvStruct; 

02132 LPSRVPROFT lpS~rvProFt = (LPSRVPROFT) (rTi cket->l pSrvProposal) ; 
02133 

02134 IpSrvStruct = (LPSRVSTRUCT) rTi cket->lpsrvstruct; 

02135 lpSrvStruct->ffh = INVALID_HANDLE_ VALUE ; 
02136 

02137 allow = ProfGetLong(PROF_USER, FT_KEY, FT_GET^ALLOW) ; 

02138 if (allow == AllowNoOne || 

02139 (allow == AllowBuddy && BuddyNotOnBuddyList(rTicket->nickname))) { 

02140 SET_RENDEZVOUS_DECLINE(rTi cket) ; 

02141 Cleanup(rTicket, 0); 

02142 } else { 

02143 lpsrvstruct->type = TypePut; 

02144 i f (FTPrepareForPut (rTi cket ,&1 psrvProFt->bName [0])) 

02145 Dosockconnect (rTi cket) ; 

02146 } 



02147 > 
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02430 else if (getCmdActi vated && CMDlD_lS_GET(rTi cket->cmdID)) 

02431 return fDoStartPut (rTi cket)) ; 
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02444 if (CMDlD_lS_GET(rTicket->cmdlD)) 

02445 DoStartPutPostCrTicket^ : 
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02500 { 
02501 
02502 
02503 
02504 
II 

02505 
02506 
02507 
02508 
02509 
02510 
02511 
02512 
02513 
02514 
02515 
02516 

MB_OKCANCEL | MB_DEFBUTTONl | MB_ICON EXCLAMATION) ; 

02517 EnableAppwindowsO ; 

02518 setFocus(hwndFocus) ; 
02519 

02520 // when Sesame is finally used 



LPRENDEZVOUSTICKET rTicket = (LPRENDEZVOUSTICKET) 1 pData ; 

if (rTicket->hModule == lpOCMinfo->hModule) { 

LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT) rTi cket->l pSrvStruct ; 
if IpSrvStruct || ! (IpSrvStruct ->sock_f lags & SockConnected) 

rTi cket-> reason == om_proto_user_exit) { 
CleanUp(rTicket.O) ; 
} else { 

char buf[512]; 
if (! goingOffline) { 

HWND hwndFocus = GetFocusO; 
HWND hwnd = GetTopmostAppWindow() ; 
LoadSt ri ng (1 pOCMinf o->hModul e , lDSFT_of f 1 i ne , 

buf , si zeof buf) ; 
Di sabl eAppwi ndows O ; 

goingOffline = MessageBox(hWnd, buf, 0, 



goi ngOf f 1 i ne=OkCancel Box(l poCMlnfo->hModul e , 

iDSFT_offline) ; 

If (goingOffline==lDCANCEL) 
CleanUp(rTicket.O) ; 



} 



} 

lplnfo->f Continue = FALSE; 



} 



return 0; // so goingOffline can be cleared with any other message 



02521 // 

02522 // 
02523 
02524 
02525 
02526 
02527 
02528 
02529 
02530 
02531 
02532 
02533 
02534 
02535 
02536 
02537 
02538 
02539 
02540 
02541 
02542 
02543 
02544 
02545 
02546 
02547 
02548 
02549 
02550 
02551 } 
02552 

02553 // 

02554 // Boilerplate OCM stuff 

02555 // 

02556 

02557 BOOL API export OCMOpen(LPOCMINFO lpOCM) 

02558 { 

02559 IpOCMInfo = lpOCM; 

02560 if(!OMRegister(OMTYPE_EVENT, OMGROUP_RENDEZVOUS, EventHandl er)) 
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case OMSG_RENDEZVOUS_EVT_ONLINE: 

^ LPRENDEZVOUSTICKET rTicket = (LPRENDEZVOUSTICKET) 1 pData ; 
if (rTicket->hModule == lpOCMlnfo->hModule) { 
lplnfo->f Continue = FALSE; 

} 

break; 

} 

case OMSG_RENDEZVOUS_EVT_ACCEPTED: 

LPRENDEZVOUSTICKET rTicket = (LPRENDEZVOUSTICKET) lpData ; 
if (rTicket->hModule == lpOCMlnfo->hModule) { 
lplnfo->f Continue = FALSE; 

} 

break; 

} 

} 

goingOffline = 0; 
return 0; 
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02940 GROUPBOX "when others issue the File Get command : n IDC_GR0UP2, 

02941 6, 85, 185, 102 

02942 CONTROL "Allow no users to get my files", 

02943 IDC_ALLOW_NOONE , "Button" , 

02944 B S_A UTORAD 1 0 B UTTON | WS_TABSTOP | WS_GROUP , 14 , 93 , 170 , 14 

02945 CONTROL "Allow only users on my Buddy List to get my files", 

02946 IDC_ALLOW„BUDDY, "Button" , 

02947 BS_AUTORADIOBUTTON | WS_TABSTOP , 14 , 104 , 170 , 14 

02948 CONTROL "Allow everyone to get my fi les" , IDC_ALL0W_ALL , "Button" , 

02949 BS^AUTORADIOBUTTON J WS_TABSTOP , 14 , 115 , 170 , 14 

02950 ltext "Directory from where others can get my files:" , 

02951 IDCSTATIC , 14 , 130 , 160 , 12 

02952 CONTROL , IDC_DIR_FILELIB , "Edi t" , 

02953 ES^AUTOHSCROLL | WS_BORDER | WS_GROUP | WS_TABSTOP, 

02954 14, 141, 171, 13 

02955 // 14, 141, 115, 13 

02956 // PUSHBUTTON "B&rowse . . . " , IDC_BROWSE_UPLOAD , 

02957 // 135,140, 50, 14, WS„GROUP | WS.TABSTOP 

02958 CONTROL "&Never display Status dialog" ,IDC_PUT_N0„STATUS, 

02959 T, BUtton", BS^UTOCHECKBOX | 
WS_TABSTOP,14,155,170,14 

02960 CONTROL "&Keep a record in logfile.txt of who has gotten ti les , 

02961 IDC_PUT_LOG_FILES, 

02962 "Button", BS_AUTOCHECKBOX | 
WS_TABSTOP , 14 , 169 , 170 , 14 

02963 
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03108 
03109 
03110 
03111 
03112 
03113 
03114 
03115 
03116 
03117 
03118 
03119 
03120 
03121 
03122 
03123 
03124 
03125 
03126 
03127 
03128 
03129 
03130 
03131 



CONTROL 

CTEXT 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 



FILELISTDLG DIALOG DISCARDABLE 10, 40, 270, 135 

STYLE WS_POPUP | WS_DLG FRAME | WS_VISIBLE | WS_CAPTION | WS_SYSMENU 
CAPTION "File Listing" 
font 8, "MS Sans serif" 

BEGIN "",IDC_THERMO, "Static", SS_SIMPLE | WS_GROUP , 8 , 3 , 192 , 39 

"" , IDC_STATUS_TEXT1, 8 , 12 , 234 , 27 
"Fast" , IDC_IMFT_SPEED_FAST, "Button" , 

BS_AUTORADIOBUTTON | WS_TABSTOP | WS.GROUP, 208 , 1, 40, 12 
"Medium" , IDC_IMFT_SPEED_MEDIUM, "Button" , 

BS_AUTORADIOBUTTON | WS_TABSTOP , 208 , 11, 40 , 12 
"Slow" , IDC_IMFT_SPEED_SLOW, "Button" , 
BS_AUTORADIOBUTTON | WS.TABSTOP, 208 ,21,40, 12 

"Pause" , idc_imft_SPEED_pause , "Button" , 
BS_AUTORADIOBUTTON | WS_TABSTOP, 208 , 31, 40, 11 
',IDC_DIR_FILELIST, LISTBOX, 

LBS_EXTENDEDSEL I LBS_MULTIPLESEL | 
LBS_STANDARD | WS_VSCROLL | SBS_HORZ | WS_TABSTOP , 
8,45,254,68 

IDI_SENDFILE_GET, IDC_STATUS_ICON2 , 10,114,32,32, SS_ICON 
"Get" , IDC_GET, 42 , 117 , 51 , 14 , WS_GROUP 
"Stop" , IDABORT , 107 , 117 , 51 , 14 , WS_GROUP 
"cancel " , IDCANCEL , 172 , 117 , 51 , 14 , WS_GROUP 



LTEXT 

DEFPUSHBUTTON 

PUSHBUTTON 

PUSHBUTTON 



END 
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03215 
03216 
03217 
03218 
03219 
03220 
03221 
03222 
03223 
03224 
03225 
03226 
03227 
03228 
03229 
03230 
03231 
03232 
03233 
03234 
03235 
03236 
03237 
03238 
03239 
03240 
03241 
03242 
03243 
03244 
03245 
03246 



FILETYPE 

FILESUBTYPE 

FILEVERSION 



VFT_DLL 
VFT2_UNKNOWN 
0, 0, 0, 0 



BEGIN 

BLOCK "stringFilelnfo" 
BEGIN 

BLOCK VERSION_BUILD_TRANSLATION_STRING 
BEGIN 

VALUE "CompanyName" , 
value "Legal Copy right", 
value "ProductName , 
value "Productversion", 
value "Build Number", 



VERSION_COMPANY 
VERSION_COPYRIGHT 
VERSION_PRODUCT_NAME 
VERSION_PRODUCT_VERSION_STRING 
VERSION_BUILD_NUMBER 



// Module-specific info 
value "FileDescription", 
value "Fileversion" , 
value "internal Name", 
value "original Filename", 



"icbm File Transfer Module" 
"0.0.0.0" 

"ICBMFT" 
"ICBMFT.OCM" 



END 
END 

BLOCK "varFilelnfo" 
BEGIN 

value "Translation", 

END 



VERSION_BUILD_TRANSLATION 



end 



03247 
03248 
03249 
03250 
03251 
03252 
03253 
03254 
03255 
03256 
03257 
03258 
03259 
03260 
03261 
03262 
03263 
03264 
03265 
03266 
03267 
03268 
03269 
03270 
03271 
03272 
03273 
03274 
03275 
03276 



(C) Copyright 1997 



America Online, Inc. 
Needham, MA 02194 



75 Second Ave. 



// 
// 
// 
// 

#include "icbmft.h" 
#include "string. h" 

/* The sequence of events is: 

1. Requester starts a Listen and sends REQUEST to buddy, with timeout 
la. Requester times out — > Cancels 

2. Receiver clicks "Accept" button, starts a connect 

2a. Receiver connect timesout; starts a Listen and sends accept to buddy 
2b. Sender gets ACCEPT, stops Listen and starts a Connect 
2c. Sender or Receiver timesout — > Cancels 

3. Connection completed; start socket protocol 

*/ 

void SockQui t(LPRENDEZVOUSTlCKET rTicket) 

LPSRVSTRUCT IpsrvStruct = (lpsrvstruct) rTi cket->l psrvstruct ; 

if (lS_RENDE2V0US_D0NE(rTicket)) { 

} else 

AppendMsg(rTi cket , iDSFTP_RecvrcannotConnect .true , FALSE , false) ; 
Sockcl eanup(rTi cket) ; 
Clean up (rTi cket, 0); 

void SockStartQui tTimer(LPRENDEZVOUSTlCKET rTicket) 
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03277 { 
03278 
03279 
03280 
03281 

03282 } 
03283 
03284 
03285 
03286 
03287 
03288 } 
03289 

03290 void 

03291 { 
03292 
03293 
03294 
03295 
03296 

03297 ] 

03298 } 
03299 

03300 void 

03301 { 
03302 
03303 
03304 
03305 
03306 
03307 
03308 
03309 
03310 
03311 
03312 
03313 
03314 
03315 
03316 
03317 
03318 
03319 
03320 
needed 
03321 
03322 
03323 } 
03324 

03325 void 

03326 { 
03327 
03328 
03329 

SockLi stening 
03330 
03331 
03332 
03333 
03334 

03335 } 

03336 } 
03337 



ft . txt 

LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT) rTi cket->lpSrvstruct; 
if (! "IpSrvStruct || IS_RENDEZV0US_D0NE ( rTi cket) ) { 
SockQuit(rTicket) ; 
return; "- 



// wait five seconds to give us enough time to get a CANCEL or nak snac 
lpSrvStruct->sock_flags 1 = SockQuiting; 
lpSrvStruct->sock_timeout = GetTickCountO + 5000; 
o_SetTimer(rTicket->hDlgwnd, 102, 5000, null); 

SockStartwaitTimer(LPRENDEZVOUSTiCKET rTi cket) 

lpsrvstruct IpSrvStruct = (lpsrvstruct) rTi cket->lpsrvstruct; 
if (lpsrvstruct) { 

// keep connection open 10 minutes 

lpSrvStruct->sock_timeout = GetTickCountO + (DWORD) (60000*10) ; 
o_SetTimer(rTicket->hDlgWnd, 102, 60000, null); 



SockLi sten(LPRENDEZVOUSTiCKET rTicket) 

lpsrvstruct lpsrvstruct = (lpsrvstruct) rTi cket->lpsrvstruct; 
if (! IpSrvStruct) 
return; 

SockCleanup(rTicket) ; 
lpSrvstruct->sock_bufsize = sock_bufsz; 

lpsrvStruct->socket = socket (af_inet, sock_STREAM, ipproto_tcp) ; 
lpsrvstruct->sin_in.sin_family = af_inet; 

lpSrvStruct->sin_in.sin_port = htons(m'cket->port) ; 

lpsrvstruct->sin_in.sin_addr.s_addr = INADDR_ANY; 
bind(lpSrvStruct->socket, (struct sockaddr *)&lpsrvstruct->sin_in, 

sizeof (lpSrvStruct->sin_in)) ; 
wsAAsyncSelect(lpSrvStruct->socket, rTicket->hDlgWnd, wm_SOCKET, 

FD_ACCEPT I FD_READ | FD.WRITE | FD_CLOSE) ; 



1 i sten(l pSrvStruct->socket , 1) ; 
lpSrvStruct->sock_flags = SockLi stening; 
lpSrvStruct->sock_timeout = 0; // caller 



should set this if timeout 



// we don't need a timer for requester because it's handled by IM window 

SockCleanup(LPRENDEZVOUSTiCKET rTicket) 

lpsrvstruct IpSrvStruct = (lpsrvstruct) rTi cket->lpsrvstruct; 
if (IpSrvStruct) { 

if (lpSrvStruct->sock_flags & 
SockConnectinglSockConnected) { 

wSAAsyncSelect(lpSrvStruct->socket, m'cket->hDlgwnd, 0, 0); 
closesocket(lpSrvstruct->socket) ; 
lpSrvstruct->socket = 0; 

lpSrvstruct->sock_flags =0; 



Page 54 




ft . txt 

03338 void SockAccept Ready (LPRENDEZVOUSTICKET rTicket) 

03339 { 



03340 LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT)rTicket->lpSrvStruct ; 

03341 if (llpsrvstruct) 

03342 return; - 
03343 

03344 if (lpSrvStruct->sock_flags & SockLi sterling) { 

03345 fd_set socks; 

03346 struct timeval imtimeout; 

03347 FD_2ER0(&socks) ; 

03348 FD_SET(lpSrvStruct->socket,&socks) ; 

03349 i mti meout . tv_sec=0 ; i mti meout . tv„usec=0 ; 

03350 if (select(0,&socks,0,0,&imtimeout)) { 

03351 int mm = sizeof (lpSrvStruct->sin_in) ; 

03352 SOCKET soc; 

03353 soc = accept(lpSrvStruct->socket , 

03354 (struct sockaddr *)&lpSrvStruct->sin_in , &mm) ; 

03355 if (SOC == INVALID_SOCKET) { 

03356 SockQuit (rTicket) ; 

03357 return; 

03358 } 

03359 closesocket(lpSrvStruct->socket) ; 

03360 1pSrvStruct->socket = soc; 

03361 lpSrvStruct->sock_flags &= -SockListening; 

03362 wSAAsyncSel ect (1 pSrvSt ruct->socket , rTi cket->hDl gwnd , WM_SOCKET, 

03363 FD_READ | FD_WRITE | FD_CLOSE) ; 

03364 lpSrvStruct->sock_flags (= SockConnected | SockReadyToRecei veHdr ; 

03365 rTicket->timeoutTime = 0; 
03366 

03367 if (lpsrvstruct->type == TypeSend | | lpSrvstruct->type == TypePut) 

03368 SockSend(rTicket,TRUE) ; 

03369 else 

03370 SockRecvReady(rTicket) ; 

03371 } 

03372 } 



03373 } 
03374 

03375 void SockRecvReady (LPRENDEZVOUSTICKET rTicket) 

03376 { 



03377 int n, num; 

03378 DWORD nRecvd, chksum; 

03379 LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT) rTi cket->l psrvstruct; 

03380 FTHDR *shdr = &lpSrvStruct->sock_hdr ; 

03381 if (llpsrvstruct) 

03382 return; 
03383 

03384 lpSrvStruct->sock_flags |= SockReadyToRecei ve; 

03385 if (lpSrvStruct->sock_flaqs & SocklsRecei vi ng || 

03386 ! (lpSrvStruct->sock_flags & SockConnected)) 

03387 return; 

03388 lpSrvStruct->sock_flags |= SocklsRecei vi ng ; 

03389 while (lpSrvStruct->sock_flags & SockReadyToRecei ve) { 

03390 lpSrvStruct->sock_flags &= -SockReadyToRecei ve; 

03391 if (lpSrvStruct->sock_flags & SockReadyToRecei veHdr) { 

03392 char buf [1024] ; 

03393 LPSTR inptr; 

03394 lpSrvStruct->speed_i ter = 0; 

03395 lpSrvStruct->speed_timestart = 0; 

03396 if (! (lpSrvStruct->sock__flags & SockRecvingHdr)) { 

03397 inptr = (LPSTR)shdr; 

03398 num = si zeof (FTHDR) ; 

03399 } else { 

03400 // should never get here, unless other client has a filename 
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03401 // >256; throw these extra bytes away since filenames are 

03402 // limited to 256 chars anyway 

03403 inptr = buf; 

03404 num = SWAP2(shdr->wHdrLen) - sizeof (FTHDR) ; 

03405 it (num > sizeof (buf)) 

03406 goto QUIT; 

03407 } 
03408 

03409 //zzz TODO if FLAGS_ABORT, ignore non-header records 

03410 n = recv(lpSrvStruct->socket , inptr, num, 0); 

03411 if (n == SOCKET_ERROR) { 

03412 int wsaerr = WSAGetLastErrorO ; 

03413 if (wsaerr == WSAEWOULDBLOCK) 

03414 break; 

03415 goto QUIT; 

03416 } else if ((! (lpSrvStruct->sock_flags & SockRecvingHdr) && 

03417 n < MIN_HDR_SZ) | | 

03418 ((lpSrvStruct->sock_flags & SockRecvingHdr) && 

03419 n < num)) { 

03420 goto QUIT; 

03421 } else if ( ! (lpSrvStruct->sock_flags & SockRecvingHdr)) { 

03422 if (FTValidateHdr(rTicket)) 

03423 goto QUIT; 

03424 if (n < SWAP2(shdr->wHdrLen)) { 

03425 lpSrvStruct->sock_flags |= 2430-2431 
2444-2445SockRecvingHdr; 

03426 continue; 

03427 } 

03428 } 

03429 lpSrvStruct->sock_flags &= 
~(SockRecvi ngHdr | SockReadyToRecei veHdr) ; 

03430 shdr->bName[FNSZ-l]=0; 

03431 if (FTProcessHdr(rTicket)) 

03432 goto QUIT; 
03433 

03434 } else if (lpSrvStruct->sock_flags & Sockconnected) { 

03435 // we are reading the file here 

03436 long todo = SWAP4(shdr->dwFilesize) - SWAP4(shdr->dwNumRecvd) ; 

03437 if (!todo) 

03438 break; 

03439 if OpSrvStruct->status_numTodo == 0) { 

03440 lpSrvStruct->status_numDone =0; 

03441 lpSrvstruct->status_numTodo = todo; 

03442 lpSrvStruct->sock_starttime = GetTi ckCountO ; 

03443 Pai ntThermo(rTi cket , FALSE) ; 

03444 } 

03445 if (lpsrvstruct->speed == SpeedPause) 

03446 break; 

03447 else if (lpSrvStruct->speed_timewai t) { 

03448 DWORD delta = GetTickCount()-lpSrvStruct->speed_timestart; 

03449 if (delta < lpSrvStruct->speed_timewai t) { 

03450 delta = (lpsrvstruct->speed_timewai t - delta); 

03451 if (delta > 0x7fff) 

03452 delta = 0x7fff; 

03453 lpSrvStruct->sock_flags |= SockRecvDelay ; 

03454 0_SetTimer(rTicket->hDlgWnd, 102, delta, NULL); 

03455 break; 

03456 } 

03457 } 
03458 

03459 num = (todo > SOCK_BUFSZ) ? SOCK_BUFSZ : (int) todo; 

03460 n = recv(lpSrvStruct->socket , lpSrvStruct->sock_buf , num, 0); 

03461 if (n == SOCKET_ERROR) { 
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03462 int wsaerr = WSAGetLastError() ; 

03463 if (wsaerr == WSAEWOULDBLOCK) 

03464 break; 

03465 SockStartQuitTimer(rTicket) ; 

03466 return; 

03467 } else if (n <= 0) { 

03468 goto QUIT; 

03469 } 

03470 // write out what we just read 

03471 if (fwrite(lpSrvStruct->sock_buf ,n,l,lpSrvStruct->fileP) != 1) { 

03472 // TODO: put up error-wri ting-file message 

03473 goto QUIT; 

03474 } 
03475 

03476 nRecvd = SWAP4(shdr->dwNumRecvd) + n; 

03477 shdr->dwNumRecvd = SWAP4 (nRecvd) ; 

03478 lpSrvStruct->sock_numSent = nRecvd; 

03479 lpSrvStruct->sock„numTotal += n; 

03480 lpSrvStruct->status_numDone += n; 

03481 chksum = (shdr->dwRecvdChecksum) ; 

03482 chksum = FTRecalcChecksum(chksum f (LPWORD)lpSrvStruct->sock_buf ,n) ; 

03483 shdr->dwRecvdChecksum = (chksum); 

03484 //zzz TODO if FLAGS_ABORT, pretend it's at the end 

03485 if (lpSrvStruct->speed_iter ==0 | | 1 pSrvStruct->speed„timewai t) { 

03486 -lpSrvStruct->speed_timestart = GetTi ckCountO ; 

03487 } else if (lpSrvStruct->speed_i ter == SPEED_NUM_ITERS && 

03488 lpSrvStruct->speed_timewait == 0) { 

03489 DWORD delta = (GetTi ckcount() - 

03490 lpSrvStruct->speed_timestart) / 
SPEED_NUM_ITERS; 

03491 lpSrvStruct->speed_timeforl = delta; 

03492 if (lpsrvstruct->speed == SpeedMedium) 

03493 lpsrvstruct->speed_timewait = delta * SPEED_MEDIUM ; 

03494 else if (1 pSrvStruct->speed == Speedslow) 

03495 lpsrvstruct->speed_timewait = delta * SPEED_SLOW; 

03496 } 

03497 1 psrvst ruct->speed_i ter++ ; 
03498 

03499 PaintThermo(rTicket, FALSE) ; 

03500 if (SWAP4(shdr->dwlMumRecvd) == SWAP4(shdr->dwFilesize)) { 

03501 BOOL listData = FALSE; 

03502 // finished with entire file; get ready for next one 

03503 if (shdr->dwchecksum != 0 && 

03504 shdr->dwChecksum != shdr->dwRecvdChecksum) 

03505 AppendMsg(rTicket , lDSFTP_RecvrDoneBadSum, false, 

03506 ISFT_RCVR(lpSrvStruct) , TRUE) ; 

03507 else 

03508 AppendMsg (rTi cket , lDSFTP_RecvrDone , FALSE , 

03509 lSFT_RCVR(lpSrvStruct) f TRUE) ; 

03510 FTCloseFileAndSetTime(rTicket) ; 

03511 listData = (lpsrvstruct->state == StateLi stData) ; 

03512 FTlncrementState(rTi cket) ; 

03513 SockSend(rTi cket, TRUE) ; 

03514 lpSrvStruct->sock_flags |= SockReadyToRecei veHdr; 

03515 lpSrvStruct->doneNum++; 

03516 lpSrvStruct->totalSizeofDoneFiles += SWAP4(shdr->dwFilesize) ; 

03517 if (1 psrvst ruct->state == StateLi stwantToGet) { 

03518 FTinitFileList(rTicket , listData); 

03519 SET_RENDEZVOUS_DONE(rTi cket) ; 

03520 } else if OpSrvStruct->doneNum >= lpSrvStruct->totalNum && 

03521 lpsrvstruct->state != StateLi stwantToGet) { 

03522 SET_RENDEZVOUS_DONE( rTi cket) ; 

03523 goto QUIT; 
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03524 } 

03525 } 

03526 } 

03527 } 

03528 lpSrvStruct->&ock_flags &= -SocklsRecei ving; 

03529 return; 

03530 QUIT: 

03531 SockQuit(rTicket) ; 

03532 return; 

03533 } 

03534 " " 

03535 void SockConnectComplete(LPRENDEZVOUSTlCKET rTicket) 

03536 { 

03537 LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT) rTi cket->lpSrvStruct; 

03538 if (llpsrvstruct) 

03539 return; 
03540 

03541 // MessageBox(0, M SockConnectComplete. M ,0,MB_OK); // zzz 

03542 lpSrvStruct->sock_timeout = 0; 

03543 1 pSrvSt ruct->sock_f 1 ags | = SockConnected | SockReadyToRecei veHdr ; 

03544 rTicket->timeoutTime = 0; 

03545 if (lpsrvstruct->type — TypeSend | | lpsrvstruct->type == TypePut) 

03546 SockSend(rTicket,TRUE) ; 

03547 else 

03548 SockRecvReady(rTicket) ; 



03549 } 
03550 

03551 // return FALSE if we cannot connect 

03552 BOOL SockConnect(LPRENDEZVOUSTlCKET rTi cket) 

03553 { 



03554 LPBVTE ipaddr = rTicket->ipAddrRemoteVerified; 

03555 LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT) rTi cket->lpSrvStruct; 

03556 if (llpsrvstruct) 

03557 goto err; 
03558 

03559 if (ipaddr[0] == 0 | | 1 pSrvStruct->sock_f lags & sockTriedunverified) { 

03560 ipaddr = rTicket->ipAddrRemote; 

03561 lpSrvstruct->sock_flags |= SockTriedunverified; 

03562 } 

03563 if (ipaddr[0] == 0) 

03564 goto err; 
03565 

03566 lpSrvStruct->sock_bufsize = SOCK_BUFSZ; 

03567 lpSrvStruct->sock_timeout = 0; 
03568 

03569 if (! (lpSrvStruct->sock_flags & SockConnected)) { 

03570 struct sockaddr_in addr; 

03571 int ret; 
03572 

03573 rTicket->timeoutTime = GetTickCountO + 60000; // 1 minute 

03574 

03575 addr.sin_family = AF„INET; 

03576 addr.sin_port = htons(rTicket->port) ; 

03577 _fmemcpy(&addr ,sin_addr , ipaddr, 4); 

03578 if (lpSrvStruct->socket) { 

03579 wSAAsyncSelect(lpSrvStruct->socket , rTicket->hDlgwnd, 0, 0); 

03580 closesocket(lpSrvStruct->socket) ; 

03581 } 

03582 lpSrvstruct->socket = socket (AF_INET, SOCK_STREAM, ipproto_TCP) ; 

03583 WSAAsyncSelect(lpSrvStruct->socket, rTi cket->hDlgwnd , WM_SOCKET, 

03584 FD_CONNECT | FD_READ | FD_WRITE | FD_CLOSE) ; 

03585 ret = connect (lpSrvStruct->socket , (LPSOCKADDR)&addr , sizeof (addr)) 

03586 if (ret == SOCKET_ERROR) { 
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03587 int wsaerr = WSAGetLastErrorO ; 

03588 if (wsaerr == WSAEWOULDBLOCK) { 

03589 // start timer 

03590 lpSrvStruct->sock_flags |= SockConnecting ; 

03591 TpSrvStruct->sock_timeout = GetTickCountO + 20000; 

03592 o_SetTimer(rTicket->hDlgwnd, 102, 10000, NULL); 

03593 return TRUE; 

03594 } 

03595 goto err; 

03596 } 

03597 1 psrvst ruct->sock_f 1 ags | = Sockconnected | SockReadyToRecei veHdr ; 

03598 rTicket->timeoutTime = 0; 

03599 lpSrvStruct->sock_timeout = 0; 

03600 } 

03601 return TRUE; 

03602 err: 

03603 SockQui t(rTi cket) ; 

03604 return FALSE; 



03605 } 
03606 

03607 void SockTi meout (LPRENDEZVOUSTICKET rTicket) 

03608 { 



03609 DWORD ticks = GetTickCountO; 

03610 LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT) rTi cket->lpSrvStruct; 

03611 if (! IpSrvStruct) 

03612 return; 
03613 

03614 if (lpSrvStruct->sock_timeout && (lpSrvStruct->sock_ti meout < ticks)) 

03615 { 

03616 if (lpSrvStruct->sock_flags & (Sockclosing | SockQui ting)) { 

03617 } else if (lS_RENDEZVOUS_TARGET(rTi cket)) { 

03618 if (lpSrvStruct->sock_f1ags & SockConnecting) { 

03619 // cannot connect; start listen and ask buddy to connect to us 

03620 SockListen(rTicket) ; 

03621 Sendcounter (rTicket) ; 

03622 lpSrvStruct->sock_ti meout = GetTickCountO + 20000; 

03623 o_SetTimer(rTicket->hDlgwnd, 102, 10000, null); 

03624 return; 

03625 } 

03626 } 

03627 SockQui t(rTi cket) ; 

03628 } else if (lpSrvStruct->sock_ti meout) { 

03629 o_SetTimer(rTicket->hDlgWnd, 102, 10000, NULL); 

03630 } else if (lpSrvStruct->sock_flags & SockSendDelay) { 

03631 lpSrvStruct->sock_flags &= -SockSendDelay; 

03632 SockSendReady (rTicket) ; 

03633 } else if (1 pSrvStruct->sock_f lags & SockRecvDelay) { 

03634 1 psrvst ruct->sock__f lags &= -SockRecvDelay; 

03635 SockRecvReady (rTi cket) ; 

03636 } 



03637 } 
03638 

03639 void SockSend (LPRENDEZVOUSTICKET rTicket, BOOL sendhdr) 

03640 { 



03641 LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT) rTi cket->l pSrvStruct ; 

03642 if (! IpSrvStruct) 

03643 return; 
03644 

03645 if (! (lpSrvStruct->sock_flags & Sockconnected)) 

03646 return; // not connected, so we cannot send anything 

03647 y 

03648 1 psrvst ruct->sock_f lags |= SockSending; 

03649 if (sendhdr) { 
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03650 lpSrvStruct->sock_flags |= SockSendingHdr; 

03651 FTlnitHdr(rTicket) ; 

03652 } 

03653 SockSendReady(rTicket) ; 

03654 } 
03655 

03656 void SockSendReady(LPRENDEZVOUSTICKET rTicket) 

03657 { 

03658 LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT)rTicket->lpSrvStruct; 

03659 FTHDR *shdr = &lpSrvStruct->sock_hdr; 

03660 if (MpSrvStruct) 

03661 return; 
03662 

03663 if (! (lpSrvStruct->sock_flags & (SockSendingHdr |SockSending))) { 

03664 return; 

03665 } 

03666 while (1) { 

03667 int n, num; 

03668 if (lpSrvStruct->sock_flags & SockSendingHdr) { 

03669 lpSrvStruct->speed_iter = 0; 

03670 lpsrvstruct->speed_timestart = 0; 

03671 num = SWAP2(shdr->wHdrl_en) ; 

03672 n = send(l pSrvStruct->socket , (LPSTR)shdr,num,0) ; 

03673 if (n == SOCKET_ERROR) { 

03674 int wsaerr = WSAGetLastErrorO ; 

03675 if (wsaerr == WSAEWOULDBLOCK) 

03676 return; 

03677 goto QUIT; 

03678 } else if (n < num) { 

03679 goto QUIT; 

03680 } 

03681 break; 

03682 } else if (lpSrvStruct->sock_flags & SockSending) { 

03683 long Inum = SWAP4(shdr->dwFilesize) - 

03684 1 pSrvStruct->sock_numSent ; 

03685 if (lpSrvStruct->status_numTodo == 0) { 

03686 lpSrvStruct->status__numDone = 0; 

03687 lpSrvStruct->status_numTodo = lnum; 

03688 lpSrvstruct->sock_starttime = GetTi ckcountO ; 

03689 } 

03690 again: 

03691 num = (lnum > (long)lpSrvStruct->sock_bufsize) ? 

03692 1 pS rvSt ruct->sock_buf si ze : (i nt) 1 num ; 
03693 

03694 if (num) { 

03695 fseek(lpsrvstruct->filep, lpSrvStruct->sock_numSent , 
SEEK_SET) ; 

03696 

03697 if (f read(lpSrvStruct->sock_buf ,num,l, lpSrvStruct->fileP) < 1) 

03698 goto QUIT; 
03699 

03700 if (lpSrvStruct->speed == SpeedPause) 

03701 return; 

03702 else if (lpSrvStruct->speed_timewai t) { 

03703 DWORD delta = GetTi ckCount()-lpSrvStruct->speed_timestart ; 

03704 if (delta < lpSrvStruct->speed_timewait) { 

03705 delta = (lpSrvStruct->speed_timewai t - delta); 

03706 if (delta > 0x7fff) 

03707 delta = 0x7fff; 

03708 lpSrvStruct->sock_flags |= SockSendDelay ; 

03709 o_setTimer(rTicket->hDlgWnd, 102, delta, null); 

03710 return; 

03711 } 
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03712 } 

03713 n = send(lpSrvStruct->socket , lpSrvStruct->sock_buf , num, 0); 

03714 if (n == SOCKET_ERROR) { 

03715 rnt wsaerr = wSAGetLastError() ; 

03716 -= if (wsaerr == WSAEWOULDBLOCK) 

03717 return; 

03718 else if (wsaerr == WSAEMSGSIZE && 

03719 lpSrvStruct->sock_bufsize > 16) { 

03720 // 16 above prevents infinite loops 

03721 lpSrvStruct->sock_bufsize »= 1; 

03722 goto again; — 

03723 } 

03724 goto QUIT; 

03725 } else { 

03726 lpSrvStruct->sock_numSent += n; 

03727 lpSrvStruct->sock_numTotal += n; 

03728 lpSrvStruct->status_numDone += n; 

03729 if (lpsrvstruct->speed_iter == 0 | | 

03730 lpsrvstruct->speed_timewait) { 

03731 lpsrvstruct->speed_timestart = GetTickCountO; 

03732 } else if (lpSrvstruct->speed_iter == SPEED_NUM_ITERS && 

03733 lpsrvstruct->speed_timewai t == 0) { 

03734 DWORD delta = ((GetTickCountO - 

03735 lpSrvStruct->speed_timestart) / 

03736 • SPEED_NUM_ITERS) ; 

03737 lpSrvStruct->speed_timeforl = delta; 

03738 if (lpSrvStruct->speed == SpeedMedi urn) 

03739 lpSrvStruct->speed__timewait = delta * 
SPEED_MEDIUM; 

03740 else if (1 pSrvstruct->speed == Speedslow) 

03741 lpsrvstruct->speed_timewait = delta * SPEED_SLOW; 

03742 } 

03743 1pSrvStruct->speed_iter++; 

03744 } 

03745 Pai ntThermo(rTi cket , FALSE) ; 

03746 } 

03747 if (lpSrvStruct->sock_numSent == SWAP4(shdr->dwFilesize)) 

03748 break; 

03749 } else 

03750 return; 

03751 } 
03752 

03753 lpSrvStruct->sock_flaqs &= -(SockSendingHdr | SockSending) ; 

03754 FTlncrementState(rTicket) ; 

03755 if (lpsrvstruct->state != StateFileData && 

03756 lpsrvstruct->state != StateListData) 

03757 lpSrvStruct->sock_flags |= SockReadyToRecei veHdr ; 

03758 return; // next wait for a reply 
03759 

03760 QUIT: 

03761 SockstartQuitTimer(rTicket) ; 

03762 return; 



03763 
03764 } 
03765 

03766 void SockConnectionClosed(LPRENDEZVOUSTlCKET rTicket) 

03767 { 

03768 // delay before calling SockQuitO to give time to receive a NAK or CANCEL 

03769 LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT) rTi cket->l pSrvStruct ; 

03770 if (IpSrvStruct) { 

03771 lpSrvStruct->sock_flags |= SockClosing; 

03772 SockstartQui tTimer (rTi cket) ; 

03773 } 
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03774 } 
03775 

03776 LRESULT sockMessage(LPRENDE2VOUSTiCKET rTicket, wparam wParam, lparam lParam) 

03777 { 



03778 LRESULT result = 1; 
03779 

03780 WORD event = wsagetselectevent(1 Param) ; 

03781 WORD error = WSAGETSELECTERROR(l Param) ; 
03782 

03783 LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT)rTicket->lpSrvStruct ; 

03784 if (IpSrvStruct && (lpSrvStruct->sock„flags & SockClosing)) { 

03785 // ignore all socket events because we are waiting for timeout 

03786 } 

03787 else if (error == 0) 

03788 { 

03789 if (event & FD^CCEPT) 

03790 SockAcceptReady (rTi cket) ; 

03791 if (event & FD_CONNECT) 

03792 sockconnectcomplete(rricket) ; 

03793 if (event & FD_READ) 

03794 SockRecvReady(rTicket) ; 

03795 if (event & FD_WRITE) 

03796 sockSendReady(rTi cket) ; 

03797 if (event & FD_CLOSE) 

03798 sockconnecti one! osed (rTi cket) ; 

03799 } 

03800 else ...... 

03801 { ' 

03802 LPSRVSTRUCT IpSrvStruct = (LPSRVSTRUCT) rTi cket->1 pSrvStruct ; 

03803 switch (error) 

03804 { 

03805 case wsaeconnrefused: 

03806 case wsaeconnaborted : 

03807 case WSAECONNRESET: 

03808 case WSAENETDOWN : 

03809 default: 

03810 { 

03811 int flags = lpSrvStruct->sock_flags; 

03812 if (! (flags & (SockTriedUnverified|SockListening)) && 

03813 (flags & Sockconnecti ng)) { 

03814 lpSrvStruct->sock_flags |= SockTriedunverified; 

03815 SockConnect (rTi cket) ; 

03816 } else if ( ! (lpSrvStruct->sock_flags & Sockconnected)) { 

03817 lpsrvStruct->sock_timeout = GetTi ckCountO - 1; 

03818 SockTimeout(rTicket) ; 

03819 } else { 

03820 SockStartQuitTimer(rTicket) ; 

03821 } 

03822 result = 0; 

03823 } 

03824 } 

03825 } 

03826 return result; 



03827 } 
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BEST AVAILABLE COP^ 



00171 voi 

00172 { 
00173 
00174 
00175 
00176 
00177 
00178 
00179 
00180 
00181 
00182 
00183 
00184 
00185 
00186 
00187 
00188 



d connLookupHost(LPCONNECTlON c, LPCSTR host, lphostent hostent) 

/* If the host is specified with an IP address, stash the address into 
* the hostent buffer and fake a lookup-complete event. 

V 

if (host[0] >= '0' && host[0] <= '9') 
{ 

DWORD iaddr; 

if ((iaddr = inet_addr(host)) == inaddr_none) 
{ 

ConnDi sconnect (c) ; 

connCall Fatal Error (c, c->session, IDS_BAD_ADDRESS , null); 
return; 

} 

connBuildFakeHostEnt(hostent, host, iaddr); 
connEventLookupComplete(c) ; 
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00189 
00190 
00191 
00192 
00193 
00194 
00195 
00196 
00197 
00198 
00199 
00200 
00201 
00202 
00203 
00204 
00205 
00206 
00207 
00208 



* 
* 
* 
* 
* 
* 

el 
{ 



conn.txt 

if host was specified with a hostname, initiate an asynchronous 
DNS lookup. This will culminate with either an EventLopkupComplete() 
or an Eventi_ookupFailed() call. Only do a timeout in the case of 
a proxy lookup. A timeout in the case of a host lookup does not 
work with the "auto dial" feature of windows 95; it does not allow 
enough time to dial and make the connection. Also, the error message 
for DNS lookup is confusing to users. 

/ 
se 

if (c->State == CONN_STATE_PROXY_LOOKUP) 

o_SetTimer(c->hsockwnd, timer_id_lookup, timeout_lookup , null); 
c->hLookupTask = wSAAsyncGetHostByName(c->hsockwnd, 

WM_GETHOSTBYNAME, host, 
(LPBYTE)hostent, 
MAXGETHOSTSTRUCT) ; 



00248 void connConnectToHost(LPCONNECTlON c, LPVOID ipaddr, WORD port) 

00249 { 

00250 SOCKADDR_IN addr; 
00251 
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00252 connDestroySocket(c) ; 

00253 conncreatesocket(c) ; 
00254 

00255 addr . sin_family = AF_INET; 

00256 addr.sin_port htons(port); 

00257 _fmemcpy(&addr.sin_addr, ipaddr, 4); 

00258 connect(c->sock, (LPSOCKADDR)&addr, sizeof (addr)) ; 

00259 0_SetTimer(c->hS0CkWnd, TIMER_ID_CONNECT, TIMEOUT_CONNECT, NULL); 

00260 - _ 

00261 TRACECONNECT(inet_ntoa(addr.sin_addr) , port, c->sock) ; 

00262 > 
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00491 void connDoServerLookup(LPCONNECTION c) 

00492 { 

00493 connChangeState(c, CONN_STATE_LOOKUP) ; 

00494 connLookupHost(c, c->serv->host , c->oscarHostEnt) ; 

00495 } 
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00506 void connDoServerConnect(LPCONNECTlON c) 

00507 { 

connchangeState(c, conn_STATE_connect) ; 



00508 
00509 
00510 
00511 
00512 
00513 
00514 
00515 
00516 
00517 } 



/* if there is no port, don't proceed. The owner will 
* disconnect us. 

if (c->serv->port == 0) 
return; 

connConnectToHostCc, &c->ipaddr, c->serv->port) ; 
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00570 { 
00571 
00572 
00573 
00574 
00575 
00576 
00577 
00578 
00579 
00580 
00581 
00582 
00583 
00584 
00585 
00586 
00587 
00588 
00589 
00590 
00591 
00592 } 



d connDoValidation(LPCONNECTlON c) 

/*' Only proceed if there is authorization, if there is no 

* authorization, hang in this state until the owner explicitly 

* disconnects us. This is used for auto-config. 

*/ 

if (c->auth != NULL) 

* /* Send the signon packet. 

*/ 

connSendSi gnon (c) ; 



/* Nuke the auth structure. 
* signon packet is sent. 
*/ 

if (c->auth) 

MemFree(c->auth) ; 
c->auth = NULL ; 

} 



connchangeStateCc, conn_state_validate) ; 



It's no longer needed once the 



00599 void connEventLookupComplete(LPCONNECTlON c) 

00600 { 



00601 int naddrs, index; 
00602 

00603 o_KillTimer(c->hSockwnd, TlMER_lD_LOOKUP) ; 

00604 c->hLookupTask = 0; 
00605 

00606 switch (c->state) 

00607 { 

00608 case CONN_STATE_LOOKUP : 

00609 { , ^ 

00610 /* More than one address may be returned from the DNS 

00611 * lookup. Count how many there are and choose one at 

00612 * random (for load distribution). 

00613 */ 

00614 naddrs =0; 

00615 while (c->oscarHostEnt->h_addr_li st [naddrs]) 

00617 index 3 = naddrs == 1 ? 0 : (int)((GetTickCount()/1000) % naddrs); 

00618 ' . . 

00619 /* Save these in case the attempt to connect to the first 

00620 * host fails, in this case, we will want to try other hosts. 

00621 V 

00622 c->numHosts = naddrs; 

00623 c->initialHostlndex = c->currentHostlndex = index; 

00624 _fmemcpy(&c->ipaddr , 

00625 c->oscarHostEnt->h_addr_list[c->currentHostindex] , 

00626 si zeof (IN_ADDR)) ; 
00627 

00628 if (c->prox != NULL && c->prox->useProxy) 
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00629 connDoProxyLookup(c) ; 

00630 else 

00631 connDoServerConnect(c) ; 

00632 break; 

00633 } 
00634 

00635 case CONN_STATE_PROXY_LOOKUP : 

00636 { 

00637 connDoProxyConnect(c) ; 

00638 break; 

00639 } 

00640 } 



00641 } 
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00739 void connEventAwai tChallangeComplete(LPCONNECTlON 

00740 { 

00741 o_KillTimer(c->hSockwnd, timer_id_challange) ; 

00742 connDoValidation(c) ; 

00743 } 
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01048 * case WM_GETHOSTBYNAME: 

01049 { ^ 

01050 word error = wsagetasyncerror(1 Param) ; 

01051 if (error — 0) 

01052 connEventLookupComplete(c) ; 

01053 else 

01054 connEventLookupFailed(c) ; 

01055 break; " 

01056 } 



01063 if (event & FD_READ) 

01064 { 

01065 if (c->State <= CONN_STATE_PROXY_REQUEST) 

01066 { 

01067 switch (c->prox->protoco I) 

01068 { 

01069 case dlg_prox_proto_socks4 : 
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01071 
01072 
01073 
01074 
01075 
01076 
01077 
01078 
01079 

01080 } 
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case DLG_PROX_PROTO_SOCKS5: 
connEventSocksResponse(c) ; 

break * 

case DLG_PROX_PROTO_HTTPS: 

connEventHttpsResponse(c) ; 
break; 

} 

} 

else 

connEventRecvReady(c) ; 
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01346 lpconnection connCreate(LPVOID owner, CONNCALLBACK callback) 

01347 { 



01348 LPCONNECTION c; 
01349 

01350 if ((C = (LPCONNECTION)MemAlloc(sizeof (CONNECTION))) == NULL) 

01351 return NULL; 
01352 

01353 if (! (c->hSockwnd = Createwi ndow(CONN_CLASS , NULL, WS_POPUP, 

01354 0, 0, 0, 0, 

01355 NULL, NULL, 1 pOCMlnf o->hModul e , NULL))) 

01356 { 

01357 MemFree(c); 

01358 return NULL; 

01359 } 

01360 SetWindowLong(c->hSockwnd, 0, (LONG)c); 
01361 

01362 c->callback = callback; 

01363 

01364 if (Cc->session = (LPSESSION)owner) != NULL) 

01365 connCalllnsertConnection(c, c->session) ; 
01366 

01367 c->state = CONN_STATE_OFFLINE ; 

01368 c->sock = INVALID_SOCKET; 

01369 c->hLookupTask =0; 

01370 c->oscarHostEnt = NULL; 

01371 c->proxyHostEnt = NULL ; 

01372 c->serv = NULL ; 

01373 c->prox = NULL; 

01374 c->auth = null; 

01375 c->proxResp = NULL; 

01376 c->destroyed = FALSE; 

01377 c~>isReceiving = FALSE; 

01378 c->isBOSConnection = FALSE; 

01379 c->numHosts =0; 

01380 c->initialHostlndex = 0; 

01381 c->currentHostlndex =0; 

01382 c->numunstartedsrvs = 0; 

01383 c->numservices = 0; 

01384 c->serviceservice = NULL ; 
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01385 
01386 
01387 
01388 
01389 
01390 
01391 
01392 
01393 
01394 
01395 
01396 } 



c->meterMap 
c->nlnacti vePeri ods 
c->shutdownCount - 



conn.txt 
MapCreateO ; 
0; 
0; 



iNlT_LlST(&c->servi ces) ; 
lNlT_LlST(&c->meters) ; 

connlnitsend(c) ; 
connlnitRecv(c) ; 

return c; 
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01514 void ConnConnect(LPCONNECTION c, LPSERVCONFIG serv, LPPROXCONFIG prox t 



01515 LPAUTHINFO auth) 

01516 { 

01517 /* Reinitialize sending and receiving FSMs. 

01518 */ 

01519 connlnitsend(c) ; 

01520 conninitRecv(c) ; 
01521 

01522 /* Save server info. 

01523 */ 

01524 if (serv !- NULL) 

01525 { 

01526 if (c->serv == NULL) 

01527 c->serv = (LPSERVCONFlG)MemAlloc(sizeof (SERVCONFIG)) ; 

01528 _fmemcpy(c->serv, serv, si zeof (SERVCONFIG)) ; 

01529 } 
01530 

01531 /* Save proxy info. 

01532 V 

01533 if (prox != NULL) 

01534 { 

01535 if (c->prox == NULL) 

01536 c->prdx = (LPPROXCONFIG)MemAl loc(sizeof (PROXCONFIG)) ; 

01537 _fmemcpy(c->prox, prox, si zeof (PROXCONFIG)) ; 

01538 } 
01539 

01540 /* Save the authorization data until we are successfully connected. 

01541 */ 

01542 if (auth != NULL) 

01543 { 

01544 if (c->auth == NULL) 

01545 c->auth = (LPAUTHINFO)N'iemAl loc (si zeof (AUTH INFO)) ; 

01546 _fmemcpy(c->auth, auth, sizeof (AUTHINFO)) ; 
01547 

01548 /* Assume it's the BOS connection if we have a username/password 

01549 * authorization, we need to set this immediately so that sess.c 

01550 * doesn't screen out fatal errors during signon. 

01551 V 

01552 if (auth->type == AUTH_TYPE_USER) 

01553 c->isBOSConnection = TRUE; 

01554 } 

01555 else 

01556 { 

01557 if (c->auth != NULL) 

01558 { 

01559 MemFree(c->auth) ; 

01560 c->auth = NULL ; 

01561 } 

01562 } 
01563 

01564 C->OSCarHOStEnt = (LPHOSTENT)MemAlloc(MAXGETHOSTSTRUCT) ; 
01565 

01566 /* If we're not using a proxy to do hostname resolution, initiate 

01567 * a DNS lookup of the server, otherwise start the proxy connect 

01568 * sequence by doing a DNS lookup of the proxy. 

01569 */ 

01570 if (c->prox == NULL || ! c->prox->useProxy || 

01571 (!c->prox->resolveHostnames && 

01572 (c->prox->protocol == dlg_prox_proto_socks4 | | 

01573 c->prox->protocol == DLG_PROX_PROTO_SOCKS5)>) 
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01574 connDoServerLookup(c) ; 

01575 else 

01576 connDoProxyLookup(c) ; 

01577 > 
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02159 void connRecei veBlock(LPCONNECT!ON O 



02160 { 




02161 


LPRECVSTATE r = &c->recvState ; 


02162 


int n; 

BYTE buf[512]; 


02163 


02164 


LPBYTE ptr; 


02165 


02166 


if ((n = recv(c->sock, (char*)buf, 512, 0)) == SOCKET_error) 


02167 


return; 


02168 


c->ninactivePeriods = 0; 


02169 




02170 


ptr = buf ; 


02171 


02172 


while (n-- > 0) 


02173 


{ 


02174 


byte b = *ptr++; 
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02237 * buffer. 

02238 */ N x 

02239 bytesToCopy = min(r->bytesLeft , (WORD)n); 

02240 __fmemcpy(r->currentByte, ptr, bytesToCopy); 
02241 

02242 /* Adjust counts and pointers accordingly. 

02243 */ 

02244 n -= bytesToCopy; 

02245 ptr += bytesToCopy; 

02246 r->bytesl_eft -= bytesToCopy; 

02247 r->currentByte += bytesToCopy; 
02248 

02249 /* If the packet is all here, dispatch it and begin 

02250 * waiting for a new packet. 

02251 */ 

02252 if (r->bytesl_eft == 0) 

02253 { , 

02254 TRACERECVFLAP(inet_ntoa(c->ipaddr) , r->type, r->seqNumber , 

02255 r->length, r->data) ; 

02256 connProcessFLAP(c, r->type, r->length, r->data) ; 

02257 MemFree(r->data) ; 

02258 r->data = 0; 

02259 r->state = recv_state_unknown; 

02260 } 

02261 break; 

02262 } 

02263 } 

02264 } 



02265 } 



02268 void connEventRecvReady(LPCONNECT!ON c) 



02269 { 

02270 lprecvstate r = &c->recvstate ; 
02271 

02272 /* indicate that there's something to receive. 

02273 */ 

02274 r->readyToRecei ve = TRUE; 
02275 

02276 . /* Block reentry to the actual receiving code. Reentry can happen 

02277 * if a SNAC handler puts up a modal dialog box. 

02278 */ 

02279 if (c->isReceiving) 

02280 return; 

02281 c->isReceiving = TRUE; 

02282 , ' 

02283 /* as long as data is available, read and process it. Clear the 

02284 * ready flag before processing, though, because it can be reset 

02285 * during processing if a SNAC handler puts up a modal dialog. 

02286 */ 

02287 while (r->readyToRecei ve) 

02288 { 

02289 r->readyToReceive = FALSE; 

02290 connReceiveBlock(c) ; 
02291 

02292 ' /* If processing the received block caused the connection 

02293 * to be destroyed, finish the job now and return immediately 

02294 * without referencing the connection object again. 

02295 V 

02296 if (c->destroyed) 

02297 { 

02298 MemFree(c); 

02299 return; 
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02300 } 

02301 } 
02302 

02303 /* Allow entry again. 

02304 */ 

02305 c->isReceivi ng = FALSE; 

02306 } 



02333 void connEventSendReady(LPCONNECTlON c) 

02334 { 



02335 LPSENDSTATE s = &c->sendstate ; 

02336 LPITEM item; 
02337 

02338 s->readyroSend = TRUE; 

02339 while ((item = FlRST_lTEM(&s->queue)) != NULL_lTEM(&s->queue)) 

02340 { 

02341 LP PACKET packet = (LPPACKET)i tern; 

02342 LPSERVICE service = PacketServi ce(packet) ; 

02343 LPQUEUE serviceQueue = PacketQueue (packet) ; 

02344 WORD bytesAvailable; 

02345 int bytesSent; // must be signed to detect error return from send() 

02346 LPBYTE addr; 
02347 

02348 /* Attempt to send as much of the block as possible. Also 

02349 * indicate that there has been activity on the connection. 

02350 */ 

02351 PacketGetData(packet, AbytesAvai Table, &addr); 

02352 bytesSent = send(c->sock, addr, bytesAvailable, 0); 

02353 c->ninacti vePeriods = 0; 
02354 

02355 /* There is a chance that winsock isn't really ready. This 

02356 * could happen if some other app snuck in and sent some data 

02357 * before us. It could also happen because of buggy winsock 

02358 * stacks (like the Shiva dialer from Netscape), in any case, 

02359 * the correct thing to do is to try again. 

02360 V 

02361 if (bytesSent == SOCKET_ERROR) 
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02362 
02363 
02364 
02365 
02366 
02367 
02368 
02369 
02370 
02371 
02372 
02373 
02374 
02375 
02376 
02377 
02378 
02379 
02380 
02381 
02382 
02383 
02384 
02385 
02386 
02387 
02388 
02389 
02390 
02391 
02392 
02393 
02394 
02395 
02396 
02397 
02398 
02399 
02400 
02401 
02402 
02403 
02404 
02405 
02406 
02407 
02408 
02409 
02410 



} 
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TraceMsg (TRACE_PROTO , "PROTO: Error sending data. .. retrying") ; 
return; - 



/* If only part of the packet could be sent, update its internal 

* pointers and return, we will be called again when winSock is 

* ready to accept more data. 
*/ 

if (bytesSent < (int)bytesAvailable) 

PacketAdvanceCpacket , (word) bytesSent) ; 

s->readyToSend = FALSE; 

return; 

} 

/* If the entire packet has been sent, destroy it. This will 

* also remove it from its queue. It's important to do this before 

* notifying the service, because the notification could cause 

* another packet to be queued, which could, in turn, cause this 

* to be reentered and send the old packet again. 
V 

PacketDestroy(packet) ; 

/* Finally notivy the service. 

V 

if (service) 

ServPacketSent(service, serviceQueue) ; 



void connsendPacket(LPCONNECTiON c, lppacket packet) 

LPSENDSTATE s = &c->sendstate ; 

PacketSetSequenceNumber (packet, s->seqNumber++) ; 

TRACESENDFLAP(i net_ntoa(c->i paddr) , 

PacketType(packet) , PacketSequenceNumber(packet) , 
PacketContentSi ze(packet) , PacketContentAddr(packet)) ; 

insert_item_at_tail((lpitem) packet , &s->queue) ; 

/* If the socket can accept data, attempt to send the block now. 
V 

if (s->readyToSend) 

connEventSendReady(c) ; 
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02740 void SesssignOn(LPSESSlON s, LPCSTR nickname, lpcstr password) 

02741 { 

02742 LPCONNECTION connection; 

02743 AUTHINFO authinfo; 
02744 

02745 /* Ignore this request if we are already signed on or are in the 

02746 * process of signing on. 

02747 */ 

02748 if (s->State > OM_P ROTO__STAT E_0 F F L I N E ) 

02749 return; 
02750 

02751 /* Create the initial connection. It will initially be used 

02752 - for authorisation, but will ultimately become the first BOS 

02753 * connection. 

02754 V 

02755 if ((connection = ConnCreate(s , sessconncallback)) == null) 

02756 return; 
02757 

02758 /* Establish the connection, using the supplied nickname and password 

02759 * for authorization. 

02760 */ 

02761 authinfo. type = AUTH_TYPE_USER; 

02762 o_st rncpy (authi nf o . user . ni ckname , ni ckname , max_SZ_nickname_len) ; 

02763 o_st rncpy (authinfo. user .password, password, MAX_SZ_PASSWORD_LEN) ; 
02764 

02765 ConnConnect (connection, &DlgServConf i g , &DlgProxConfig, Sauthinfo); 
02766 

02767 /■* Save the nickname so that other OCMs can enquire about it. This 

02768 * is temporary. It will be replaced by the official nickname (with 

02769 * capitalization and spacing from registration database) once we 

02770 * retrieve that from the server. 

02771 V 

02772 SessSetNickname(s, nickname); 

02773 } 
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03731 
03732 
03733 
03734 
03735 
03736 
03737 
03738 
03739 
03740 
03741 
03742 
03743 
03744 
03745 
03746 
03747 
03748 
03749 
03750 
03751 
03752 
03753 
03754 
03755 
03756 
03757 
03758 
03759 
03760 
03761 
03762 
03763 
03764 
03765 
03766 
03767 
03768 
03769 
03770 
03771 
03772 
03773 
03774 
03775 
03776 
03777 
03778 
03779 
03780 
03781 
03782 
03783 
03784 
03785 
03786 
03787 
03788 
03789 
03790 
03791 
03792 



void connSendSignOn(LPCONNECTiON c) 

lppacket packet; 7 

BYTE verbuf [128] , buf[512]; 

WORD Ten; 

SNACSTREAM SS; 

LPAUTHINFO auth = c->auth; 
SNACOpen(&ss, sizeof buf, buf); 
SNACPutLong(&ss, 1); 
switch (auth->type) 

case AUTH_TYPE_USER: 

{ 

WORD i ; 
long temp; 

WORD nicksize = lstrlen(auth->user. nickname) ; 
word passsize = lstrlen(auth->user .password) ; 

if (nicksize == 0 | | passsize == 0) 

CarioDi sconnect(c) ; 

conncall Fatal Error (c, c->session, ids_password_REQUIRED, null); 
return; 

} 

/* Send nickname and password. 
*/ 

SNACPutWord(&SS, TLV_TAGS_NICK) ; 

SNACPutword(&ss, nicksize); 

SNACPutBlock(&ss, nicksize, (LPBYTE)auth->user .nickname) ; 

SNACPUtWord(&SS, TLV_TAGS_PASSWORD) ; 
SNACPutwordC&ss, passsize); 
for (i =0; i < passsize; i++) 

SNACPutByteC&ss , (BYTE) (auth->user . password [i ] Axorstri ng [i ] ) ) ; 

/* Send client version string. 

V 

len = (WORD)wsprintf (verbuf , "%s, version %s/%s", 

(LPCSTR) VERSION_PRODUCT_NAME, 

(LPCSTR)VERSION_PRODUCT_VERSION_STRING, 

VERSION_FILEOS == VOS_DOS_WINDOWSl6 ? 

(LPCSTR) "WIN16" : (LPCSTR) "WIN32"); 
SNACPutWord(&SS, TLV_TAGS_CLIENT_IDENTITY) ; 
SNACPutWord(&ss, len); 
SNACPutBlock(&ss, len, verbuf); 

/* Send structured client version. 
*/ 

{ 

WORD ma j , mi n , pnt , bl d ; 
ParseversionNumber(&maj , &min, &pnt, &bld); 

SNACPUtWord(&SS , TLV_TAGS_CLIENT_ID) ; 

SNACPutword(&ss, 2); 
SNACPutWO rd (&S s , TOOL_ID) ; 

SNACPUtWord(&SS, TLV_TAGS_MAJOR_VERSION) ; 
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03793 SNACPutWord(&ss, 2); 

03794 SNACPutwordC&ss, maj); 
03795 

03796 SNACPutWord(&SS, TLV_TAGS_MINOR_VERSION) ; 

03797 SNAGPutWord(&ss, 2); 

03798 SNACPutwordC&ss, min); 
03799 

03800 SNACPUtWordC&SS, TLV_TAGS_POINT_VERSION) ; 

03801 SNACPutword(&ss, 2); 

03802 SNACPutwordC&ss, pnt) ; 
03803 

03804 SNACPUtWordC&SS, TLV_TAGS_BUILD_NUM) ; 

03805 SNACPutwordC&ss, 2); 

03806 SNACPutWord(&ss, bid); 

03807 } 
03808 

03809 /* Send the international crap. 

03810 */ 

03811 { 

03812 char buf [32] ; 
03813 

03814 if (RDBLoadSt ri ng(RESMODULE , IDS_INTL_COUNTRY_CODE, 

03815 buf, sizeof buf)) 

03816 { 

03817 .SNACPutwordC&ss, tlv_tags_country) ; 

03818 SNACPutString(&ss, buf); 

03819 }. . ... 

03820 i f (RDBLoadSt ri ng (RESMODULE , IDS_INTI LANGUAGE_CODE , 

03821 buf, sizeof buf)) 

03822 { 

03823 SNACPUtWord(&SS, TLV_TAGS__ LANGUAGE) ; 

03824 SNACPutStringC&ss, buf); 

03825 } 

03826 if (RDBLoadSt ringCRESMODULE, IDS_INTL_SCRIPT_CODE, 

03827 buf, sizeof buf)) 

03828 { 

03829 SNACPutWord(&ss, TLV_TAGS„SCRIPT) ; 

03830 SNACPutString(&ss, buf); 

03831 } 

03832 } 
03833 

03834 /* If it's a non-AOL client, send the distribution channel 

03835 V 

03836 temp = RDBLoadval ue(RESMODULE , idv_dist_channel, 0); 

03837 if (temp != 0) 

03838 { 

03839 SNACPUtWord(&SS, TLV_TAGS_DIST„CHANNEL) ; 

03840 SNACPutWord(&ss, 4); 

03841 SNACPutLong(&ss, (DWORD)temp) ; 

03842 } 
03843 

03844 /* If there is a stored disconnect reason, send it now. 

03845 */ 

03846 temp = Prof Get Long (prof_global , miscgroup, misc_key_disconnect) ; 

03847 if (temp != 0) 

03848 { 

03849 SNACPutW0rd(&SS, TLV_TAGS_DISCONNECT_REASON) ; 

03850 SNACPutword(&ss, 2); 

03851 SNACPutword(&ss, (WORD)temp); 

03852 } 
03853 

03854 /* Mark this connection as the BOS connection. 

03855 */ 

Page 62 



03856 
03857 
03858 
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03860 
03861 
03862 
03863 
03864 
03865 
03866 
03867 
03868 
03869 
03870 
03871 
03872 
03873 } 
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c->isBOSConnection = TRUE; 

break; 

} 

case auth_type_cookie: 

SNACPUtWord(&SS, TLV_TAGS_LOGIN_COOKIE) ; 
SNACPutword(&ss, auth->cookie. length) ; 

SNACPutBlock(&ss, auth->cookie. length, auth->cookie. buffer) ; 
break; 

} 

} 

packet = PacketCreate(FLAP_SlGNON_TYPE, SNACBytesTransferred(&ss) , buf, 

NULL, NULL); 

ConnsendPacket(c, packet); 
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04052 void connProcessSignOn(LPCONNECTlON c, LPSNACSTREAM Ipss) 

04053 { 

04054 DWORD version; 

04055 SNACGetLongOpss, Aversion); 

04056 if (version ~ 1) 

04057 connEventAwai tchal 1 angeCompl ete (c) ; 

04058 else 

04059 connEventAwai tchal 1 angeFai 1 ed (c) ; 

04060 } 
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04628 
04629 
04630 
04631 
04632 
04633 
04634 
04635 
04636 
04637 
04638 
04639 
04640 
04641 
04642 
04643 
04644 
04645 
04646 
04647 
04648 
04649 
04650 
04651 
04652 
04653 
04654 
04655 
04656 
04657 
04658 
04659 
04660 
04661 
04662 
04663 
04664 
04665 
04666 
04667 
04668 
04669 
04670 



void connProcessFLAP(LPCONNECTiON c, word type, word size, lpbyte data) 

SNACSTREAM SS ; 

SNACOpen(&ss., .size, data); 

switch (type) 

case FLAP_SIGNON_TYPE : 

connProcessSignon(c, &ss); 
break; 

case FLAP_SIGNOFF_TYPE: 

connProcessSignOff (c, &ss) ; 
break; 

Case FLAP_ERROR_TYPE: 

connProcessError(c, &ss) ; 
break; 

case FLAP_DATA_TYPE : 



{ 



WORD group, type, flags; 
DWORD reqid; 

SNACGetHeader(&ss, &group, &type, &flags, &reqid); 
if (group == OMGROUP_SERVICE) 

switch (type) 

case SNAC_SNAC_ERR : 
{ 

WORD code, type, Ten; 

SNACGetword(&ss, &code) ; 

while (SNACGetword(&ss, &type)) 

SNACGetword(&ss, &len); 
SNACSkipBytes(&ss, len); 

switch (GETTAG(reqid)) 

case SNAC_SERVICE_CLIENT_ONLINE: 
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04737 
04738 
04739 
04740 
04741 
04742 
04743 
04744 
04745 
04746 
04747 } 



} 
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b r e a k * 

case SNAclsERVICE_MOTD: 

connProcessMOTD(c, &ss, reqid); 
break; 



} 

else 
{ 

OMSendMessage(OMTYPE_SNAC, group, type, size, data); 
break; 
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